A-B-F= 10 вроде так все будет, если в таблице не ошибся
<span>А. for i:=-5 to 5 do тело цикла; - 11 раз
В. for i:=6 to 2 do тело цикла; - 0 или 1 раз
С.for i:= 3to 3 do тло цикла ; - 1 раз
D. for i:=3 downto 4 do тело цикла - 1 или 0 раз
E. for i := 3 downto 1 do - 3 раза</span>
9)
var s:real;
begin
write ('Введите число: ');
readln(s);
if (-5 <= s)and (s < 5) then
writeln('Точка приндалежит отрезку [-5,5)')
else
writeln('Точка не принадлежит отрезку [-5,5)');
end.
10)
var s,i:real;
begin
write ('Введите 2 числа: ');
read(s);
read(i);
if ((s<0)and(i<0)and (s>i)) then
begin
s:=s*2;
i:=i*2;
end
else
begin
s:=s+2;
i:=i+2;
end;
writeln(s);
writeln(i);
end.
256=2^8, поэтому для представления цвета пикселя достаточно 8 бит. Но кроме этого, монитору надо указывать координаты пикселя, так что на самом деле пиксель будет занимать больше, чем 8 бит)))