Помогите пожалуйста
Приложения:

Ответы на вопрос
Ответил Oxmieeee4on
0
Ответ:13 20
Объяснение:вот прога
program progra;
uses crt;
var
x,y:integer;
begin
x:=10;
y:=15;
while y<16 do
if x<=y then begin
x:=x+5;
y:=y-5;
end
else begin
x:=x-3;
y:=y+5;
end;
writeln(x,' ',y);
end.
Новые вопросы
Английский язык,
2 года назад
Русский язык,
2 года назад
Геометрия,
7 лет назад
Геометрия,
7 лет назад
Математика,
9 лет назад
Математика,
9 лет назад