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