Напишите программу на языке паскаль, которая будет - вопрос №656655 от limbo03rus 19.07.2022 07:05

Question

Информатика: Напишите программу на языке паскаль, которая будет вычислять наибольший общий делитель для двух целых чисел а) с repeat б) с while

limbo03rus · Answer

а)var a,b:integer; begin read(a,b); repeat if a b then a:=a-b else b:=b-a; until (a=b); write(a); end.б)var a,b:integer; begin read(a,b); while (a b) do if a b then a:=a-b else b:=b-a; write(a); end....