Question

1. Напишите программу в паскаль, которая определяет, верно ли, что введённое число двузначное и первая цифра в нем 3
2.Напишите программу в паскаль, которая определяет, верно ли, что введённое число положительное и кратно 5

Answer 1

Ответ:

begin

 var s := readInteger();

 print( ((s > 0) and (s mod 7 = 0))? 'Да': 'Нет' )

end.

Объяснение: