написать программу в Pascal и составить её блок -схему: по возрасту, введённому с клавиатуры, определить, к какой возрастной группе относится человек:
5-9 класс
|
от 0 до 7 лет дошкольник. от 8 до 17 лет школьник, от 18 до 23 лет студент, 24-55 лет работник, от 56 лет и старше пенсионер.
var
a:integer;
begin
write('Введите возраст '); readln(a);
write('Этот человек ');
case a of
0..7: writeln('дошкольник');
8..17: writeln('школьник');
18..23: writeln('студент');
24..55: writeln('работник');
else
writeln('пенсионер');
end;
end.
Другие вопросы из категории
как… и был неповоротлив как …. Задания выполнял медленно как ….На протяжении многих дней я был упрям как …и трудолюбив как ….Теперь, когда я сижу за компьютером, я ощущаю себя свободно как … в небе.Я ориентируюсь в панелях инструментов OpenOffice.org Writer как …в воде. Ясмел в выборе пунктов меню как ….Сегодня я спокоен как … и мудр как … .2.3. Замените пропуски подходящими по смыслу рисунками. При необходимостиизмените параметры рисунков в диалоговом окне Изображение.4. Сохраните файл в своей папке и завершите работу с программой.
Системный подход это.
Структура это.
Системный эффект это.
Читайте также
вычисления суммы чисел от 6 до 10. Написать программу вычисления n! (факториал числа n), где n- целое неотрицательное число.
Определение факториала:
0!=1, 1!=1, 2!=1*2, 3!=1*2*3, ……,n!=1*2*3*…*(n-1)*n.
Другими словами n!- это произведение n натуральных чисел.
ввести 3 значное число и находит сумму его цифр.
2. Написать программу, которая предлагает ввести 3 значное число и меняет порядок цифр наоборот. (123- 321)
3.Написать программу, которая предлагает ввести три числа с клавиатуры, находит их сумму, произведение и среднее арифметическое.
арифметического полученных значений.
2. За весну Обломов похудел на p1 кг, за лето поправился на p2 кг, за осень похудел на p3 кг, за зиму поправился на p4 кг. Написать программу, определяющую, похудел или поправился за год Обломов.
3. Написать программу, которая определяет, является ли целое число четным двузначным числом.
4. Даны коэффициенты квадратного уравнения. Написать программу, определяющую его корни
программу которая вставит между буквами веденного слова пробелы 3)написать программу вывода на экран деление двух чисел
расположденных по диагонали
3.Написать программу рисующую горизонтальную цепочку из 12 кругов,каждый круг должен на половину закрывать предыдущий
Помогите,а то сижу с паскалем уже час с лишним и все никак не получается..
Заранее спасибо)