Определите, что будет напечатано в результате выполнения программы : var n, s: integer;
begin
n := 4;
s := 0;
while n <= 8 do
begin
s := s + n;
n := n + 1
end;
write(s)
еnd.

корл1ц    3   03.05.2021 08:39    0