Ответ:
var k,n:integer;
begin
k:= 2;
n:= 3;
while k+n<10 do
k:=k+2;
n:=n+1;
end;
writeln(k);
writeln(n);
end.
Copyright © 2024 SCHOLAR.TIPS - All rights reserved.
Answers & Comments
Ответ:
var k,n:integer;
begin
k:= 2;
n:= 3;
while k+n<10 do
begin
k:=k+2;
n:=n+1;
end;
writeln(k);
writeln(n);
end.