program p_1; var i, n : integer; s : real; b : array [1..1000] of real; begin writeln('введите количество значений массива n'); readln(n); write('введите элементы массива а: '); for i: =1 to n do readln(a[i]); writeln('введите элементы массива b'); for i: =1 to n do readln(b[i]); writeln('первоначальный массив b'); for i: =1 to n do writeln(b[i]); s: =0; for i: =1 to n do if a[i] mod 2 = 0 then s: =s+b[i]; writeln('сумма четных значений =', s); end.
Ответ дал: Гость
var
a,b: integer;
begin
write('введите в одной строке два целых числа и нажмите < enter> ');
readln(a,b);
if a=b then writeln('числа равны')
else
if a> b then writeln(a,' больше')
else writeln(b,' больше')
end.
Ответ дал: Гость
пусть х лет мальчику, тогда
(х+2)/(х-2)=2
х+2=2(х-2)
х+2=2х-4
х=6лет мальчику
пусть у лет девочке, тогда
(у+3)/(у-3)=3
у+3=3(у-3)
у+3=3у-9
2у=12
у=6 лет девочке
ответ : мальчик и девочка одного возраста
Ответ дал: Гость
отмечено как нарушение через stoker ( w: 0% t: 4 )
причина: смотри (^ этот символ означает степень, например 3^2 = три в квадрате или три в степени два) : 2,1 гбайт * 90% = 1,89 гбайт 1,89 гбайт = 1,89 * 2^10 мбайт 1,89 гбайт = 1,89 * 2^20 кбайт 1,89 гбайт = 1,89 * 2^30 байт при сохранении текста обычно используется кодировка ascii (26+26+33+33+10+спец.символы ~= 256 => 1 символ занимает 8 бит то есть 1 байт) таким образом, из условий мы имеем, что скорость записи составляет 200 символов * 1 байт = 200 байт/ минуту 200 байт представим в виде 100 * 2 теперь 3 класс s=t*v => t=s/v дано: s=1,89 * 2^30 кбайт v=100*2^1 t - ? решение: t=(1,89 * 2^30) / (100*2^1) = 0,0189 * 2^29 (минут) округлив - получается где-то 19 лет и 4 месяца (19,358 лет)
Популярные вопросы