Условный оператор IF … THEN … ELSE. Для выполнения действий по заданным условиям в Gambas существует условный оператор, который имеет краткую и полную.

Презентация:



Advertisements
Похожие презентации
Определение максимального и минимального значений переменных. Задание 1. Даны две переменные А и В, значения которых вводятся командой Input. Определить.
Advertisements

Ветвление и условный оператор Паскаль-3. Ветвление – это такой вычислительный процесс При котором выбирается одно из нескольких заранее предусмотренных.
Операторы ветвления (перехода) Разработала учитель Веревкина В.Н.
Алгоритмическая конструкция «ветвление». Данная конструкция применяется в алгоритмах для задач, при решении которых необходимо делать выбор между различными.
Разветвляющаяся алгоритмы. Условные операторы Ветвление - выбор пути решения задачи в соответствии с выполнением или невыполнением некоторого условия выбора.
УСЛОВНЫЙ ОПЕРАТОР IF... THEN... ELSE (Если … То … Иначе)
Алгоритмическая структура «Цикл» Тема урока. 1. Циклические алгоритмы Циклические алгоритмы обеспечивают многократное выполнение некоторых действий, которые.
Ветвление и условный оператор Паскаль-3. Ветвление – это такой вычислительный процесс При котором выбирается одно из нескольких заранее предусмотренных.
Ветвление Полное ветвление Если УСЛОВИЕ то КОМАНДА 1 иначе КОМАНДА 2; IF УСЛОВИЕ THEN КОМАНДА 1 ELSE КОМAНДА 2;
Ветвление в алгоритмах и программах. ОПРЕДЕЛЕНИЕ Разветвляющийся алгоритм – это алгоритм, в котором в зависимости от условия выполняется либо одна, либо.
АЛГОРИТМ ВЕТВЛЕНИЯ ОПЕРАТОР ВЕТВЛЕНИЯ. Какая задача решается по этой программе? Program Z1: Var a,b,c: integer; Begin Write ( vv a,b:); Read (a,b); C:=(a+b)*(b-a);
как подготовить информацию к обработке на компьютере как воспользоваться компьютером для обработки информации.
ПРОГРАММИРОВАНИЕ ПОВТОРЕНИЙ МОУ «Средняя общеобразовательная школа 41» Учитель информатики: Рассохина Г.В. САРАНСК 2008.
Алгоритм ветвления на языке Pascal. 4.Оператор условного перехода 4. Оператор условного перехода IF THEN Begin группа операторов 1 End ELSE Begin группа.
1. Какие числа относятся к типу Integer Real 2. Исправь ошибки в программе Program 2 pr; Var b,s: real; Begin Writeln (Введите числа b и с) Readln( b,c);
Цель: Показать сходство и различие цикла с параметром в языках программирования QBasic и Turbo Pascal 7.0.
ПРОГРАММИРОВАНИЕ ПОВТОРЕНИЙ. НАЧАЛО AB A, B, C A = A + C F = B + C F КОНЕЦ B = B + C F = A + B B < C A = A + B F = A + C нет да A = 1, B = 1, C = 4 F=?
Выбор действий в Бейсике (ветвление). Задача: найти максимальное число из двух чисел. Словесная форма записи: Алгоритм MAX Начало 1. Запросить числа A,
Алгоритмы с ветвящейся структурой. Программирование ветвлений на QBasic. Программное управление работой компьютера Епифанова Т.Н. / 2010 CLS INPUT A,B,C.
Условный оператор. Алгоритм с ветвлением – это такой алгоритм, в котором осуществляется выбор одного из двух путей продолжения алгоритма. На TPascal данный.
Транксрипт:

Условный оператор IF … THEN … ELSE. Для выполнения действий по заданным условиям в Gambas существует условный оператор, который имеет краткую и полную формы. Краткая форма: Запись в одну строку, если нужно выполнить одно действие по условию IF THEN IF THEN Запись, если действий много IF THEN … END IF

Запись в одну строку, если нужно выполнить несколько действие по условию IF THEN : IF THEN : Условием может выступать любая арифметическая операция сравнения: > - больше; = - больше или равно; - неравно; Графическое представление краткой формы условного оператора: действие ? нет да

Полная форма: Запись в одну строку, если нужно выполнить одно из двух действий IF THEN ELSE Запись, если действий много IF THEN … ELSE … END IF

Графическое представление полной формы условного оператора: действие_1 ? нет да действие_2 Задача 1: Даны три переменные: D, E, F, значения которых запрашиваются командой Input. Где D – количество столов, привезенных в здание; Е – количество одинаковых помещений в здании; F – количество столов, которых нужно поставить в одно помещение. Определить: а) сколько помещений полностью будут заставлены столами; б) хватит ли столов на всё здание (вывод на форму «да» или «нет» в) если «нет», то сколько нужно еще столов; г) если «да», то сколько столов лишних.

Решение: Dim d, e, f as integer Input d, e, f Print "количество привезенных столов ="; d Print "количество помещений ="; e Print "количество столов для одного помещения ="; f n = e * f If d >= n Then Print "Столами заставят "; e; " помещений" If d < n Then Print "Столами заставят "; Fix(d / f); " помещений" If d >= n Then Print "Да, столов хватит. Лишних - "; d - n If d < n Then Print "Нет, столов не хватит. Не хватает - "; n - d

Задача 1_а: Измените программу так, чтобы не появлялось сообщение «Лишних - 0». Задача 2: Даны три переменные: E, F, G, значения которых запрашиваются командой Input. Где E – количество деревьев в лесу; F – сколько месяцев продолжалась вырубка; G – количество деревьев, вырубленных за неделю. Для простоты решения принять, что в каждом месяце по 4 недели. Определить: а) сколько деревьев было вырублено за все время; б) останутся ли деревья в лесу (вывод на форму «да» или «нет» в) если «нет», то сколько нужно еще деревьев; г) если «да», то сколько деревьев осталось. Задача 2_а: Изменить программу так, чтобы расчет велся точно, т.е. в месяце не 4 недели.

Результат выполнения программы задания 1 может быть такой, как на рис.: