my-programs.3dn.ru
Быстрая навигация
Главная
Домашняя страница
Решенные задачи
Все решенные задачи
Форум
Наш форум
Выход
Выход из сайта
Реклама
Пусто
Меню сайта
Категории раздела
С подпрограммой [8]
Простые задачи [11]
Строки [5]
Массивы [7]
Графика [2]
Сложные задачи [2]
Мини-чат
Статистика


Онлайн всего: 1
Гостей: 1
Пользователей: 0
Главная » Turbo Pascal - готовые задачи » Простые задачи

Программа дошкольник, школьник, студент, рабочий или пенсионер

Написать программу, которая при вводе числа, определяет кто это - дошкольник, школьник, студент, рабочий или пенсионер.

Решение:

program voz;
var v:integer;
begin
writeln('Ввести возраст');
readln(v);
case v of
1..6:writeln('Дошкольник');
7..18:writeln('Школьник');
19..25:writeln('Студент');
26..54:writeln('Рабочий');
55..100:writeln('Пенсионер');
101..10050:writeln('Бесcмертный');
end;
END.

Категория: Простые задачи | Добавил: deespe (03.02.2011)
Просмотров: 2098 | Рейтинг: 0.0/0
Всего комментариев: 0
Имя *:
Email *:
Код *:

Поиск
Опрос
Вам помог наш сайт?
Всего ответов: 133
Хостинг от uCoz