Решение задачи №12 из главы 9
Primary tabs
Изучите код:
var s:integer; f:boolean; begin f := true; b := false; if (f=true) then s:=1; else s:=2; if (b=false) then s:=3; else s:=4; end.-- блоки условий можно переписать более кратко, без использования сравнения = true или = false, с сохранением той же логики работы программы.
Подсказки:
оператор if итак неявно сравнивает значение логического выражения в скобках с true (и принимает решение, какую именно ветку then или else выполнить)
для второго if в коде выше потребуется использование оператора Not.
Решение
var s:integer; f:boolean; begin b := not false; if (f) then s:=1; else s:=2; if (b=not false) then s:=3; else s:=4; end.
- Log in to post comments
- 1296 reads
vedro-compota
Sat, 05/22/2021 - 16:47
Permalink
if (b=not false)
перепишите без использования сравнения "="
_____________
матфак вгу и остальная классика =)