Викторин
6 год назад
Составить по алгоритму программу на языке программирования Pascal.
ОТВЕТЫ
Levepnef
Aug 8, 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.
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.
215
