Операторы не выполнятся т.к записанны с ошибками, а если бы они были записанны так
S:=0;n:=5;
for i:=2 to n do s:=s+100 div i;
Тогда значение переменной S было бы равно 128
Uses crt;
var a:array[1..4] of integer;
sum,i:integer;
begin
clrscr;
writeln('Введите 4 целых числа:');
for i:=1 to 4 do
begin
read(a[i]);
if a[i]mod 3=0 then sum:=sum+a[i];
end;
writeln('Сумма чисел, кратных трем: ',sum);
<span>end.</span>
1 символ 8 бит = 1 байт на одной стр 36*48 символов = 1728 символов то есть 1 страница 1728 байт, 48 страниц = 1728*48 = 82944
32 рисунка по 2080 байт = 66560
итого 82944 + 66560 = 149504 байт или 146 Килобайт
I=1800 байт u=14400 t=? и решаешь в два действия есть 2 варианта 1-14400 : 8= 1800 байт/с или 2- 1800 • 8 =14400 и второе смотря как решал 1800 : 1800 =1 секунда ну вроде так