(>31)И НЕ(сумма цифр числа x больше 8)
Напишите наименьшее число x​

Исходя из условия, нам нужно найти наименьшее значение x, которое будет больше 31, а сумма его цифр меньше 8.

Берём первое число - 32

Сумма его цифр 3 + 2 = 6 условию подходит.

ответ: 32

программа на языке паскаль

program pr;

s: string;

begin

readln (s);

if length(s) mod 2=0 then writeln ('четное') else writeln('не четное');

readln;

end.

программа №4program str999; uses crt; var s: string; begin writeln('введіте фразу'); read(s); if (s='край озер') then writeln ('край озер лесов и рек'); if (s='я учусь в школе') then writeln ('я учусь в 10-м классе') end. №5program p_1; uses crt; var s: string; begin writeln('введите фразу'); read(s); if (s='моя родина беларусь') then writeln ('беларусь моя родина'); if (s='люблю цябе мой родны кут') then writeln ('мой родны кут люблю цябе')  end.