Составить программку, печатающую значение true, если обозначенное выражение является правильным, и

Если входящее в программку число будет кратно трем, а также на конце этого числа не будет находится цифра 0, программка обязана будет возвращать значение правды.
Значит, нам необходимо проверять двойное условие. Делается это с поддержкою слова and.
Если в конце стоит цифра ноль, то при разделеньи всего числа на 10 обязано получится целое число, поэтому что при дробленьи на 10 мы просто убираем ноль в конце.
А кратность числу 3 проверим с помощью mod.
begin
readln(vhod);
if (vhod mod 3 = 0) and (vhod mod 10 = 0) then
writeln(True)
else
writeln(False);
end.