Question

Составьте программу,которая проверяет,является ли человек заданного возраста школьником,если возраст школьника- от 6 до 17лет,и выводит на экран соответствующие сообщение: Является либо не является

Answer 1

Var A:integer;
Begin
WriteLn('Введи возраст человека');
ReadLn(A);
if (A>6)and(A<17) then Write('Является школьником')
else WriteLn('Не является школьником')
End.

Answer 2

Спасибо)))

Answer 3

Если от 6 до 17, включая 6 и 17, то замени:
(A>6)and(A<17)
на:
(A>=6)and(A<=17)

Answer 4

Не за что=)))