Условные операторы

### Конспект урока | Вопросы самопроверки | Задания на дом | Практикум | Тест

Условный оператор. В Турбо Паскале имеются два вида операторов, позволяющих совершать какие-либо операции в зависимости от выполнения заданного условия. Эти операторы называются операторами условного перехода или просто условными операторами. Полная форма условного перехода.
If <логическое выражение> Then <оператор1> Else <оператор2>;
Например:
If a>0 then s:=s+d else s:=s-b;
После Then и Else можно записать только один оператор. В том случае, когда по условию задачи необходимо использовать несколько операторов или выражений, при выполнении или невыполнении условия применяется так называемый составной оператор.
Составной оператор.
Begin
Операторы
End.
Например:
If a>c then
Begin
C:=a-c;
K:=k+1;
End
Else
Begin
a:=c-a;
L:=l+1;
End.
Неполная форма оператора.
If <логическое выражение> Then <оператор>;
Например:
If a<>b Then a:=a-b;
If (x<=10) and (x>=0) Then y:=sgr(x);
Задача: Нахождение наибольшего из трех введенных с клавиатуры чисел.
Program maks(input,output);
Uses crt;
Var
a,b,c,max:real;
Begin
{Ввод данных}
Writeln (‘Введите значение чисел а,b,c’);
Readln(a,b,c);
{Поиск максимального числа}
If a>b then max:=a else max:=b;
If max {Печать результатов}
Writeln (‘Наибольшее из введенных чисел= ’,max);
{Задержка вывода на экран}
Repeat until keypressed;
End.

1.Какие два оператора позволяют совершать какие-либо операции в зависимости от выполнения заданного условия?
2.Как записывается полная форма условного оператора?
3.Как записывается неполная форма условного оператора?

### 1. Повторить условные операторы;
2. Выполнить задачу:
Найти сумму всех вводимых с клавиатуры чисел, кратных заданному числу а.
3. Повторить команды цикла на алгоритмическом языке.