<span>10 INPUT D</span><span>
30 IF D > 1070 AND D < 1100 AND D MOD 7 = 0 AND D MOD 5 = 0
</span><span> THEN PRINT "Вводимый год может быть годом рождения китайского поэта"
</span><span> ELSE PRINT "Вводимый год не может быть годом рождения китайского поэта"</span>
END IF
<span>40 END</span>
<em>Ответ 108 страниц</em>
Определяем общий информационный объем Vt=7680 бит/сек *1,5 мин =7680 бит/сек * 90 сек =691200 бит
Информационный объем одной страницы i * k =16 бит * 400 = 6400 бит
Определяем количество страниц 691200 бит / 6400 бит = 108
1/
var i:integer;
begin
for i:=1 to 20 do begin
if i mod 2=1 then write(i, ' ');
end;
end.
2/
var i:integer;begin
for i:=15 to 40 do begin
if i mod 2=0 then write(i,' ');
end;
end.
F_s=60*40=2400
o_s=2400*6=14400
odin_simv=28800/14400=2 bayt
bit=2*8=16 bit
Result= 16 bit