Выделите значения так, чтобы программа печатала значение true.

Var t: Boolean;
i: integer;
begin
t:= [true /false];
i:=0;
repeat
t:= [not t / false];
i:=i+1
until i=[100/101/102];
write (t)
end.

tasyakondrateva0    3   18.05.2020 09:37    9