10 минут= 600 секунд
1 Кбайт= 1024 байта
1024 * 8 =8192 бита
8192/600=13 бит/с
Выведет 128;
1 2 4 8 16 32 64 128
Program Task;
Var a, b: Real;
Begin
Write('a = ');
ReadLn(a);
Write('b = ');
ReadLn(b);
WriteLn('Среднее арифметическое: ', ((a + b) / 2):5:2);
ReadLn;
End.
Begin
randomize;
writeln('Для молодёжи: ', 1 + random(100));
writeln('Для взрослых: ', 101 + random(100));
writeln('Для стариков: ', 201 + random(50));
end.
Ответ:
1,3,5,7
Объяснение:
Если-не-правильно-извини-но-вроде-так-должно-быть!