Предмет: Информатика,
автор: zelenskiy36
Помогите с информатикой
Приложения:

porludom:
Было бы неплохо увидеть правую часть схемы
Ответы
Автор ответа:
0
Ответ:
составлю на 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; -иначе н-м.
попробуй сам. если не правильно пиши исправлю.
Интересные вопросы
Предмет: Математика,
автор: smertnyhgrehovsem
Предмет: Математика,
автор: angelinaci1909
Предмет: Математика,
автор: LoGaS5701
Предмет: Химия,
автор: Kot9711
Предмет: Математика,
автор: руслан520