написать свою программу на паскале со словами IF THEN ELSE
SRO4NO!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
Ответы
Ответ:
Условный оператор в Паскале имеет следующий синтаксис:
Сокращенный вариант:
if условие then
оператор;
Полный вариант:
if условие then
оператор
else
оператор;
неполная форма ветв
Операторные скобки и составной оператор в Паскале:
if логическое выражение then
begin
оператор1;
оператор2;
end
else
begin
оператор1;
оператор2;
end;
Перевод с английского оператора условия облегчит понимание его использования:
IF THEN ELSE
ЕСЛИ ТО ИНАЧЕ
Условный оператор в Паскале
В условии (в логическом выражении) используются операторы отношения.
Рассмотрим список операторов отношения Паскаля:
больше >
меньше <
больше или равно в Pascal >=
меньше либо равно в Pascal <=
сравнение в Pascal =
не равно в Pascal <>
Пример: найти наибольшее из двух чисел
Вариант 1 Вариант 2
1_11 2
Подробно разобраться в работе условного оператора в Паскале можно, просмотрев видеоурок:
Пример: вычислить значение переменной у по одной из двух ветвей
условный оператор
Показать решение:
Обратите внимание на то, как в данном примере выводится y. При выводе переменных типа real в pascal, можно использовать так называемый форматированный вывод, или запись с двумя двоеточиями:
y:6:2
- цифра после первого двоеточия (6) указывает на то, сколько знаков будет занимать число при выводе на экран
- цифра после второго двоеточия (2) указывает на то, сколько знаков после запятой вещественного числа будет выводиться
Таким образом, использование такой записи в pascal практически позволяет выполнить округление до сотых, тысячных и т.п.
вий обязательно заключать в скобки.
Пример: Рассмотрим примеры логических операций в логических выражениях в Паскале
1
2
3
4
5
6
7
8
var n:integer;
begin
n:=6;
if (n>5) and (n<10) then writeln('истина');
if (n>7) or (n<10) then writeln('истина');
if (n>7) xor (n<10) then writeln('истина');
if not(n>7) then writeln('истина');
end.
Пример: Компания набирает сотрудников от 25 до 40 лет включительно. Ввести возраст человека и определить, подходит ли он для данной компании (вывести ответ «подходит» или «не подходит»).
Особенность: надо проверить, выполняются ли два условия одновременно.
Вариант 1 Вариант 2
1 сложные условия
Пример: Дано целое число A. Проверить истинность высказывания: «Число A является нечетным».
Открыть решение:
Задача 3. Дано целое число A. Проверить истинность высказывания: «Число A является положительным».
Задача 4. Человек вводит в компьютер число. Если оно находится в интервале от 28 до 30, то нужно напечатать текст ПОПАЛ, если оно больше или равно 30 - то ПЕРЕЛЕТ, если оно находится на отрезке от 0 до 28, то НЕДОЛЕТ, если число меньше нуля — НЕ БЕЙ ПО СВОИМ
Построение блок-схем по коду Паскаль
Теперь настало время вспомнить о том, что такое блок-схемы.
Блок схема - ориентированный граф, указывающий на последовательность операций, приводящую к решению поставленной задачи.
Существуют управляющие структуры трех типов:
блок-схема, следованиеследование блок-схема, ветвлениеветвление блок-схема, повторение или циклповторение или цикл
Две из трех представленных структур блок-схемы мы уже можем перевести в код Pascal.
Пример: Составить блок-схему вычисления значения величины С, определяемое по формулам: С=A+B, если A<=B и C=A-B, если A>B.
Результат:
блок схема ветвление
Задача 5. Составить блок-схему решения задачи 3
Пример: автобусный билет считают счастливым, если сумма трех первых цифр билета равна сумме трех последних цифр. Требуется составить блок-схему алгоритма определения билета, имеющего счастливый номер.
Открыть решение:
Задача 6. По составленной выше блок-схеме решить задачу на Pascal
Задача 7. Дано двузначное целое число. Вывести сумму и произведение его цифр. Проверьте правильность вашей программы. Для нахождения цифр числа использовать операцию взятия остатка mod и операцию целочисленного деления div. Модуль числа - функция abs().
Пример результата:
Введите двузначное число: -12
Сумма цифр = 3
Произведение цифр = 2
Задача 8. Дано трёхзначное целое число. Вывести все его цифры (порядок не имеет значения). Проверьте правильность вашей программы. Для нахождения цифр числа использовать операцию взятия остатка mod и операцию целочисленного деления div.
Пример результата:
Введите трёхзначное число: -123
Разряд сотен: 1
Разряд десяток: 2
Разряд единиц: 3
Объяснение: