Задача 12 Урок 9
Primary tabs
Изучите код:
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, с сохранением той же логики работы программы.
Подсказки:
оператор if итак неявно сравнивает значение логического выражения в скобках с true (и принимает решение, какую именно ветку then или else выполнить)
для второго if в коде выше потребуется исползование оператора Not.
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
- 392 reads