Задача 12 Урок 9
Primary tabs
Задача 12 Урок 9Изучите код:
var s, t:integer;
f, b:boolean;
begin
f := true;
b := false;
if (f=true) then
t:=1;
else
t:=2;
if (b=false) then
s:=3;
else
s:=4;
end.
-- блоки условий можно переписать более кратко, без использования сравнения = true или = false, с сохранением той же логики работы программы.
var s, t:integer; f, b:boolean; begin f := true; b := false; if (f) then t:=1 else t:=2; if (not b) then s:=3 else s:=4; end.
- Log in to post comments
- 735 reads