Вопрос по информатике:
Разработайте программу в паскаль, которая запрашивает у пользователя возраст мужчины и, в зависимости от введенного значения, выводит на экран результат из списка: до 9 лет – дитя; до 12 лет – отрок; до 18 лет – юноша; до 24 лет – молодой человек; до 60 лет – мужчина; старше 60 лет – старик.
- 24.08.2018 09:35
- Информатика
- remove_red_eye 20070
- thumb_up 22
Ответы и объяснения 2
//PascalABC.NET (версия 3.1, сборка 1198 от 11.03.2016)
begin
var n:integer;
repeat
n := ReadInteger('Введите возраст');
until n 0;
case n of
1..9: println('Дитя');
10..12: println('Отрок');
13..18: println('Юноша');
19..24: println('Молодой человек');
25..60: println('мужчина')
else println('старик');
end;
end.
- 25.08.2018 13:34
- thumb_up 46
Var n: integer;
begin
writeln('Введите свой возраст');
readln(n);
case n of
1..9: writeln('Дитя');
10..12: writeln('Отрок');
13..18: writeln('Юноша');
19..24: writeln('Молодой человек');
25..60: writeln('Мужчина');
else writeln('Старик');
end;
end.
- 26.08.2018 15:19
- thumb_up 40
Знаете ответ? Поделитесь им!
Есть сомнения?
Не нашли подходящего ответа на вопрос или ответ отсутствует? Воспользуйтесь поиском по сайту, чтобы найти все ответы на похожие вопросы в разделе Информатика.
Трудности с домашними заданиями? Не стесняйтесь попросить о помощи - смело задавайте вопросы!
Информатика — наука о методах и процессах сбора, хранения, обработки, передачи, анализа и оценки информации с применением компьютерных технологий, обеспечивающих возможность её использования для принятия решений.