Начало
повтори 4 раза
пока справа стена
повтори шаг вперед
конец цикла
закрась клетку
поверни напрво 90
конец
В Excel удобно строить, сам считает :)
640 * 480 * i = 307200 байт
i = 307200 байт / 307200 = 1 байт = 8 бит
2^i = N
2^8 = 256
N = 256
256 цветов в палитре
Var
a: integer;
begin
readln(a);
if (a mod 3 = 0) or (a mod 10 = 4) then
writeln('Да')
else
writeln('Нет')
<span>end.</span>