Const N:=30(любое значение);
var a:array[1....N] of integer;
begin
for i:=1 to N do begin
write ('A='); read (a[i]);
end;
c:=0;
for i:=1 to N do begin
if a[i] mod 3=0 then begin
c:=c+1;
end;
end;
write (c);
end.
16 Кбайт = 16*1024 байт = 16*1024*8 бит
Память для одного пикселя: 16*1024*8 / (128*128) = 8 бит
Число цветов = 2^8 = 256
Наличие источника и приемника информации и канала связи между ними
Самые удаленные города это города А и Б, самая короткая дорога до них это через АЕС и будет равна она 17
Начало
Введение a, b
c=a+b
написать с
Конец