1.For i:=1 to 30 do
begin
writeln(x);
end;
2.x:=-5;
while x<=8 do
begin
y:=abs(x);
writeln(y);
x:=x+1;
end;
3.for x:=10 downto 3 do
begin
writeln(x);
end;
4.x:=30;
while x>=1 do
begin
y:=x*x;
writeln(y);
x:=x-1;
end;
Сначало посетил каталог под номером 3
c:\project\scheme\device
потом посетил каталог под номером 2
c:\install\local
16 бит = 2 байта - это 1 символ
В строке 66 символов
х=2*66=132Байта.
256 = 2 в 8 степени. 1 пиксель равен 8 бит
100*100*8/25 = 3200 бит в секунду
или 3200/8 = 400 байт в секунду
Это же не для 5-9 класов задание