Class04:


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

1. Верны ли операторы:
a) if x > 0 then x:=2 else; y:=x+1;
b) if odd(k) then else k:=0;
c) if 1 < x < 2 then x:=x+1; y:=0; else x:=0; y:=y+1;
d) if 1 < x and x < 2 then
begin x:=x+1; y:=0 end;
else begin x:=0; y:=y+1 end;

2. Напишите часть программы:
a) x:=abs(x);
b) a:=max(x, y);
c) a:=max(x, y); b:=min(x, y);
d) переменной k присвоить номер четверти плоскости, в которой находится точка с координатами (x,y) (xy < > 0)

3. Напишите программу: даны произвольные числа a,b,c. Если нельзя построить треугольник с такими длинами сторон - напечатайте 0, иначе напечатать 3, 2, 1 в зависимости от того, равносторонний это треугольник, равнобедренный или какой-либо иной.

4. Запишите условный оператор, эквивалентный оператору присваивания x:= a or b and c (все переменные - логические), в котором не используются логические операции.

5. Запишите оператор присваивания, эквивалентный условному оператору
if a then x:=b else x:=c (все переменные - логические)