1)
dopustim svet 1 bit. pixel=80x50
pixel=4000
razmer=4000x svet(1)
razmer=4000
2)
svetnaya paltira=2^5
znachit svet=5
pixel=80x50
pixel=4000
razmer=4000x5
razmer=20000
3)
1 все числа однажначные
2 все числа двухзначные
Var a,b,i,k: integer;
begin
read(a,b);
k:=0;
for i:=a to b do begin
if i mod 2=0 then k:=k+1;
if i mod 2=0 then writeln ('i=',i);
end;
writeln ('k=',k);
end.
Var
s: integer;
mas: array[1..4]of integer;
begin
s := 0;
for var i := 1 to 4 do
begin
mas[i] := 2 * i;
s := s + mas[i];
end;
writeln(s);
end.
Ответ:20