Question

Человек вводит в компьютер число. если оно находится в интервале от 28 до 30, то нужно напечатать текст ПОПАЛ, если оно больше или равно 30 - то ПЕРЕЛЕТ, если оно находится на отрезке от 0 до 28, то НЕДОЛЕТ, если число меньше нуля — НЕ БЕЙ ПО СВОИМ

Составьте пожалуйста программу на паскале, 9 класс

Answer 1

===== PascalABC.NET =====

begin

 var x := ReadInteger;

 if x < 0 then Print('НЕ БЕЙ ПО СВОИМ')

 else if x < 28 then Print('НЕДОЛЕТ')

 else if x < 30 then Print('ПОПАЛ')

 else Print('ПЕРЕЛЕТ')

end