Задача 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, с сохранением той же логики работы программы.
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; writeln('Znachenie s ravno: ',s); writeln('Znachenie t ravno: ',t); readln(); end.
- Log in to post comments
- 1072 reads
vedro-compota
Sun, 08/08/2021 - 12:04
Permalink
решение засчитано
решение засчитано
_____________
матфак вгу и остальная классика =)