Здесь Вы можете найти ответы на многие вопросы или задать свой вопрос!
var
i: integer;
begin
for i: =100 to 999 do
if ((i+1) mod 2=0) and ((i+2) mod 3 =0) and ((i+3) mod 4=0) and ((i+4) mod 5 =0)
then writeln(i);
end.
var i,s: integer;
writeln('summa ');
if i mod 17 =0 then s: =s+i else s: =s+0;
writeln(s)
телевидение
радиовещание
интернет
газеты и т.д
для начала переведем 100мбит в байты.
100мбитс=100*1024*1024/8=13107200 байт
13107200 байт*1с = 13107200 байт.
ответ: 13107200 байт.
Популярные вопросы