Question

Помогите с информатикой
​

Answer 1

Ответ:

составлю на Pascal ABC

program c;

Var m,n:integer;

begin

m:=54; n:=16;

while n=m do begin

if m>n then m:=m-n else n:=n-m;

end;

end.

Объяснение:

while n=m do begin- пока м=н выполнять это действие

if m>n then m:=m-n- если м>н тогда нужно м-н

else n:=n-m; -иначе н-м.

попробуй сам. если не правильно пиши исправлю.