
Taakvyam
6 год назад
Составить по алгоритму программу на языке программирования Pascal.

ОТВЕТЫ

Елизарович
Aug 7, 2019
Var x,y:integer;
begin
x:=2;
y:=3;
repeat
if xgt;y then y:=y*x else x:=x*y;
until xgt;y;
end.
begin
x:=2;
y:=3;
repeat
if xgt;y then y:=y*x else x:=x*y;
until xgt;y;
end.
282
Смежные вопросы: