Выберите из приведённых фрагментов кода программы, написанной на языке 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.

Сос1111111 Сос1111111    3   15.04.2020 09:52    9

Ответы
Settiko Settiko  13.10.2020 06:46

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

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

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

ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика