Напишите наименьшее число х для которого истинно высказывание

(х больше 31) и не (сумма цифр числа х меньше 8)

ответ:

36

объяснение:

36 больше 31

сумма цифр числа 36 равна 9 больше 8

на пиксель приходится 512*8/32²=4 бита.  2^4=16 цветов.

если n это количество чисел, начинаем с 3

var

i,n,p: integer

begin

readln(n);

i: =3;

p: =1;

while i< =3*n do

begin

p: =p*i;

i: =i+3;

end;

writeln(p);

end.

если n это верхняя граница чисел

var

i,n,p: integer

begin

readln(n);

for i: =3 to n

if i mod 3 = 0 then

p: =p*i;

writeln(p);

end.