Составить программу для проверки является ли число больше 5 и меньше 20 одновременно...

Question

Составить программу для проверки является ли число больше 5 и меньше 20 одновременно Паскаль​

Answer 1

program proverka;

var x:integer;

begin

write('Введите число -> ');

read(x);

if (x>5)and(x

writeln ('Число меньше 5, или больше 20');

end.