Составьте программу, которая проверяет, является ли человек заданного возраста школьником, если возраст школьника - от 6 до 17 лет, и выводит на экран соответствующее сообщение: "Является" либо "Не является".
Составьте программу, которая проверяет, является ли человек заданного возраста школьником, если возраст школьника - от 6 до 17 лет, и выводит на экран соответствующее сообщение: "Является" либо "Не является".
Гость
Ответ(ы) на вопрос:
Гостьprogram check_shk1;
uses crt;
var a:integer;
BEGIN
writeln('Введите возраст.');
readln(a);
if (a>6) and (a<17) then
writeln('Является.')
else
writeln('Не является.');
END.
Гостьvar
a :integer;
begin
write ('введите количество лет ');
readln(a);
if (a>5)and(a<18) then write('является ') else write('не является ');
end.
Не нашли ответ?
Похожие вопросы