Марина сделала презентацию и решила отправить ее диме определите сколько для этого понадобится времени в минутах если объём презентации равен 9000 а скорость передачи данных равна 614400 бит/с
Ответы на вопрос:
объем 9000 * 2^13 поделить на скорость 614400 и получим время:
120 секунд или 2 минуты
var
i,c:integer; //Объявляем переменные
mas: array [1..20] of integer; //Объявляем массив
begin
c:=0; //Обнуляем переменную c
writeln('20 случайных чисел:'); //выводим на экран сообщение
randomize; //запускам рандом
for i:=1 to 20 do begin //запускаем цикл для массива от 1го до 20го элемента по очереди
mas[i]:=random(5,20); //генерируем число от 5 до 20
if mas[i] mod 2 = 0 then begin //запускам проверку, на четность числа. Если оно делится без остатка на 2
c:=c+1; //то к переменной c прибавляем единицу (значит оно четное
end;
write(mas[i], ' '); //Выводим наш массив
end;
writeln(); //пробел между строк
writeln('Количество четных элементов = ', c); //выводим количество четных элементов
end.
Популярно: Информатика
-
olgakoryakina23.08.2022 08:12
-
алекссоколевский19.01.2022 08:50
-
andry9252603.05.2023 22:50
-
mariy210421.01.2021 13:18
-
salatinabbasova22.02.2020 06:13
-
maksymr090605.04.2023 22:41
-
Polk151214.06.2022 12:32
-
DashaKim12302.01.2022 10:22
-
Alisa4561218.01.2022 07:46
-
SergeyS923.10.2022 21:42