Question

Как записать это в паскале?

Answer 1

Ответ:

var

 U1, U2: Boolean;

begin

 WriteLn ('S1');

 if U1 then

   WriteLn ('S2')

 else

   WriteLn ('S3');

 if U2 then

   WriteLn ('S4');

 WriteLn ('S5');

end.