Условный оператор (if)

Надпись if

Условные операторы в программах позволяют выполнять определенные действия, в зависимости от самого условия. Обычно оператор if (с англ. "если") начинается с ключевого слова IF, за которым следует условие и ключевое слово THEN (с англ. "то"). Например, если переменная A будет больше переменной B, то выполнить следующее действие: в переменную Z присвоить значение переменной A, записывается следующим образом: IF A>B THEN Z:=A;.
После THEN точка с запятой никогда не ставится, но для выполнения не одного действия, можно поставить BEGIN, а в конце действий END. Если это условие не верно, то действия, указанные сразу после THEN, не выполняются.

Чтобы обработать условие в случае его невыполнения, используют ELSE (с англ. "иначе"). Перед ELSE, даже если и стоит какое-либо действие, точка с запятой никогда не ставится. Если перед ELSE стоит END, то точка с запятой после END также не ставится. Вот полный код программы, благодаря которой пользователь вводит два числа, а программа находит наибольшее значение из них и выводит на экран:

Алгоритм поиска наибольшего числа

Если Вы внимательно посмотрели на данный код, то заметили, что часть кода, выделенная желтым цветом, Вам пока еще не известна. На самом деле здесь ничего особенного нет. Мы выводим значение переменной и пишем в скобках просто переменную. Но если нам нужно вывести на экран свое дополнение, то апостроф (') поможет нам в этом. Для этого выделите дополнение в 'одиночные кавычки' и Ваше предложение появится на экране (на большинстве клавиатурах это русская буква "Э", печатаемая на английской раскладке).

Как говорилось выше после THEN и ELSE можно выполнять множество действий. Например:

Несколько действий на Pascal

Задания:

  • Составьте программу, используя апостроф, символ "*" (без кавычек) и оператор вывода, отображающую на экране рисунок домика
  • Дан номер месяца. Найдите этот месяц.
  • Найдите ошибки:
    program SUMMA
    begin

    i:=1;
    wirte('i:=',a) ;
    end


Ответы к заданиям предыдущей статьи:

  • Напишите программу, которая находила бы среднее арифметическое из трех чисел.

Cреднее арифметическое Pascal

  • Найдите площадь прямоугольника, треугольника, окружности.

Для решения данной задачи достаточно лишь узнать формулы площадей прямоугольника, треугольника и окружности.
Sпр=ab
Sтр=(a*b)/c
Sокр=pR2
Теперь вставляем полученные действия в наши три программы. Результат формул выводим на экран, а значение остальных переменных будет задавать пользователь.

Площадь прямоугольника

Pascal Площадь прямоугольника

Площадь треугольника

Площадь треугольника Pascal

Площадь окружности

Площадь окружности Паскаль

  • Есть число 256. Найдите все цифры, составляющие это число, и высветите на экран при помощи mod и div.

Здесь, видимо, подразумевалось найти эти цифры при помощи функций mod и div. Вот полный код:

Найти цифры составляющие число Паскаль

В начале программы в переменную chislo пользователь вводит свое значение, например 256. Можно было записать сразу chislo:=256, но мы будем делать такую программу, которая находила цифры для любых чисел. Дальше в переменную a мы присваиваем значение первой цифры переменной chislo. Для этого мы просто chislo делим на 100 и забираем только целую часть числа (256/100=2). Чтобы найти второе число, мы находим остаток от деления chislo на 100 (например из числа 256 мы нашли 56, так как 256/100=2, ост. 56) и затем делим на 10, используя div, тем самым забирая целую часть числа (56/10=5). Затем находим третье число, также используя mod (256/10=25, ост. 6). Таким образом мы нашли и записали в переменные цифры, составляющие число, записанное в переменной chislo. То есть наша программа работает только для трехзначных чисел. Теперь полученные цифры мы должны вывести на экран в столбик (так как, если все числа вывести в одну строку, то они сольются и результат будет совпадать с тем же числом, которое мы ввели, и никаких изменений в программе видно уже и не будет). Для этого мы воспользовались три раза оператором вывода. Теперь наша программа работает успешно.


<<Предыдущая статья                                     Следующая статья >>

Опубликовано:

Читайте также:
Заказывайте товары и услуги:

Комментарии (0)
Оставить комментарий