Главная страница Случайная страница
Разделы сайта
АвтомобилиАстрономияБиологияГеографияДом и садДругие языкиДругоеИнформатикаИсторияКультураЛитератураЛогикаМатематикаМедицинаМеталлургияМеханикаОбразованиеОхрана трудаПедагогикаПолитикаПравоПсихологияРелигияРиторикаСоциологияСпортСтроительствоТехнологияТуризмФизикаФилософияФинансыХимияЧерчениеЭкологияЭкономикаЭлектроника
Условный оператор If
|
|
Условный оператор обеспечивает выполнение или невыполнение некоторого оператора, группу операторов – в зависимости от заданных условий.
Структура условного оператора имеет следующий вид:
If < условие> then < оператор 1> else < оператор 2>;
If < условие> then < оператор>;
где If, then, else – зарезервированные слова (если, то, иначе);
< условие> – произвольное выражение логического типа. Оно может быть простым или сложным. Сложные условия образуются с помощью логических операций AND, OR, XOR, NOT. При записи условий могут использоваться все возможные операции отношения;
< оператор> – простой или составной оператор. Составной оператор представляет собой группу из произвольного числа операторов, отделенных друг от друга точкой с запятой, ограниченную операторными скобками – зарезервированные слова Begin и End.
Формат:
Begin < оператор 1>; < оператор 2>;... < оператор N> End.
На рис.5.1 представлены блок-схемы разветвляющегося алгоритма с использованием условного оператора If.
Вариант № 5
Написать программу проверки знания истории архитектуры. Программа должна вывести вопрос и три варианта ответа. Пользователь должен выбрать правильный ответ и ввести его номер. В случае неверного ответа пользователя программа должна выводить сообщение о неверном ответе и повторно запросить ввод номера варианта. Ниже представлен рекомендуемый вид экрана во время работы программы (данные, введенные пользователем, выделены полужирным шрифтом).
Архитектор Исаакиевского собора:
1. Доменико Трезини
2. Огюст Монферран
3. Карл Росси
Введите номер правильного ответа и нажмите < Enter>
Вы ошиблись.
Введите архитектора заново. {правильный ответ – Огюст Монферран.}
Тело программы:
Program z1;
var o: integer;
— Регулярная проверка качества ссылок по более чем 100 показателям и ежедневный пересчет показателей качества проекта.
— Все известные форматы ссылок: арендные ссылки, вечные ссылки, публикации (упоминания, мнения, отзывы, статьи, пресс-релизы).
— SeoHammer покажет, где рост или падение, а также запросы, на которые нужно обратить внимание.
SeoHammer еще предоставляет технологию Буст, она ускоряет продвижение в десятки раз, а первые результаты появляются уже в течение первых 7 дней. Зарегистрироваться и Начать продвижение
Begin
writeln ('Архитектор Исаакиевского собора: ');
writeln ('1. Доминико Трезини');
writeln ('2.Огюст Монферран');
writeln ('3.Карл Росси');
writeln ('введите номер правильного ответа и нажмите < Enter> ');
write('-> '); readln(o);
if o=2 then writeln ('правильно.') else begin
writeln ('вы ошиблись');
writeln ('Архитектор Исаакиевского собора - Огюст Монферран');
end;
end.
Блок схема:
Лабораторная работа № 7
«Оператор выбора Case»
1. Цель лабораторной работы: изучить оператор выбора, применять его в программировании для организации алгоритмов с ветвлениями наряду с условным оператором.
Оператор выбора Case часто используют для замены конструкций из вложенных условных операторов. Управляющая конструкция «выбор» является идеальным средством для обработки ситуаций со многими (более чем двумя) исходами, т.е. в случае, когда условие может принимать более двух значений. Оператор «выбор» имеет следующую структуру:
Case < параметр: порядковая переменная> OF
< значение 1>: < оператор 1>;
< значение 2>: < оператор 2>;
…
< значение N>: < оператор N>;
[ELSE < оператор N+1> ];
END; {для Case}
Вариант №7
1. Напишите программу для вычисления степени введенного с клавиатуры числа. Показатель степени в диапазоне 0..9. Если пользователь укажет недопустимое число, программа должна вывести сообщение " Ошибка ввода данных. Введите число от 1 до 9" и снова запросить ввод числа.
Тело программы:
Program Stepeni;
label m1;
var a, b, c: integer;
Begin
m1: writeln('введите число и нажмите < Enter> ');
read(a);
writeln ('введите показатель степени');
read(b);
case b of
0: c: =(0);
1: c: =(a);
2: c: =(a*a);
3: c: =(a*a*a);
4: c: =(a*a*a*a);
5: c: =(a*a*a*a*a);
6: c: =(a*a*a*a*a*a);
7: c: =(a*a*a*a*a*a*a);
8: c: =(a*a*a*a*a*a*a*a);
9: c: =(a*a*a*a*a*a*a*a*a);
|
|