Question

Выберите из приведённых фрагментов кода программы, написанной на языке Pascal, те, в которых представлены условные операторы.


if X <> 0 then Y := 5 / X;


Var C: Char; X: Real; i: Integer;


case X of 0: WriteLn ('Ложь '); 1: WriteLn ('Истина '); End;


if X >= 0 then WriteLn ('Число положительно ') else WriteLn ('Число отрицательно ');


Begin WriteLn ('Введите число: '); ReadLn (X); End.