Операторы Паскаль: линейные алгоритмы, операторы ветвления

Слайд #1

Линейные алгоритмы.
Операторы ветвления.
ЯП Паскаль

Слайд #2

Повторение
Написать программу, которая вычисляет площадь
квадрата по введенному значению стороны.

Слайд #3

Проверка
var a,s:integer;
begin
write('a=');
read(a);
s:=sqr(a);
writeLn('s=',s,' квадратных единиц')
end.

Слайд #4

Операторы ветвления

Общий
вид:
if< условие> then< оператор_1> else< оператор_2>
При записи на языке Паскаль разветвляющихся алгоритмов используют условный оператор.

Слайд #5

Примеры программ:

Слайд #6

№1. Написать программу вывода о введенном числе:
кратно или не кратно 3.
№2. Написать программу вывода о введенном числе:
кратно или не кратно 5.
if a mod 3 =0 then
writeLn('a = ',a,' - кратно 3')
else
writeln('a = ',a,' - некратно 3')
if a mod 5 =0 then
writeLn('a = ',a,' - кратно 5')
else
writeln('a = ',a,' - некратно 5')

Слайд #7

Сложные условия и вложенные условия
Вложенный if аналогичен логической операции and.
if (x > 5) and (x < 10) then
Writeln('х попадает в интервал');
х
5
10

Слайд #8

Домашнее задание:
Написать программу решения неравенства x>6.