vikakittenlove

04.10.2020 08:18 •  Информатика

Какое значение примет переменная С в результате выполнения программы:
Var A, B, C,i: integer;
Begin
A:=4;
B:=A*3-6;
for i:=4 to 5 do
BEGIN
If B>2*A Then A:=2;
IF B<2*A Then A:=5;
If B=2*A Then A:=B-А;
B:=A+2;
END;
C:=A*B;
Writeln (c=", С);
End.
.