Таблица истинности во вложении.
Файл во вложении направляю на вам в группу для для покупок и в в
Для хранения цвета одной точки изображения с 32 <span>градациями серого цвета требуется log(2)32 = 5 бит. Объем файла = 800*600*5 бит = 800*600*5/8 байт = 100*600*5/1024 Кбайт </span>≈ 293 Кбайт
Нц
пока справа свободно - закрасить вправо
кц
нц
пока снизу свободно - закрасить <span>вниз
</span>кц
нц
пока слева свободно - закрасить <span>влево
</span><span>кц
</span>нц
пока сверху свободно - закрасить <span>вверх
</span><span>кц
</span>стоп.
Var
a,b,d:integer;
begin
Read(a,b);
d:=a mod 10 - b mod 10;
if d<0 then Writeln('Разряд единиц меньше у 1-го числа')
else
if d>0 then Writeln('Разряд единиц меньше у 2-го числа')
else Writeln('Разряды единиц у обоих чисел равны')
end.