TURBO PASCAL |
Новости |
Практическое задание N 1. 5
1. Синоптики
объявляют погоду на ближайшие дни:
1-солнце, 2-дождь,
3-туман,
4-ветер.
Зная нужную вам погоду,
вы принимаете определенное решение:
жду нужную погоду, либо -
беру отгул, которое
выводится на экран. Программа
запрашивает ввод нужной погоды и выводит на
экран ваше решение на каждый день до дня
отгула.
2. Старуха
послала старика с просьбой: поймать в море
нужную ей рыбку. Рыба
клюет в определенной последовательности:
окунь, камбала,
линь, треска.
Поймав рыбку, старик
принимает решение: ловлю
еще, либо -
еду домой, которое
выводится на экран. Программа
запрашивает ввод нужной рыбки и выводит на
экран решение старика на каждый улов до
нужного.
В случае зависимых событий,
исключающих одновременное их
выполнение, могут
применяться вложенные
условные операторы. Во
вложенных условных операторах служебное
слово "else" относится к ближайшей
конструкции If "условие"
Then "оператор1"
за которым оно следует,
т. к. "оператор2"
выполняется в случае, если "условие" -
ложно.
Приведем пример программы определения
весовой категории в зависимости от веса
спортсмена. PROGRAM
VES; {
определение весовой категории спортсмена }
Условная схема программы
CONST A1='легкая
категория';
A2='средняя категория';
Then
A3='тяжелая категория';
IF Writeln(A1)
A4='сверхтяжелая категория';
Else
var V
: integer;
Then
IF Writeln(A2)
BEGIN
Else
write('введите вес
спортсмена V=');
Then
readln(v);
IF Writeln(A3)
Else
IF V < 62 then writeln(A1)
else
Writeln(A4)
IF
V < 75 then writeln(A2) { вложенный
условный оператор }
else
IF V < 88 then writeln(A3) { вложенный условный
оператор }
else
writeln(A4); writeln('Нажмите Enter');
readln; END. |
(с) Все права защищены. По всем интересующим вопросам прошу писать электронный адрес |