var a, b, nok: integer; begin readln (a, b); nok:=(a*b); while a<>b do begin if a>b then a:=a-b else b:=b-a; end; nok:=nok div a; write (nok); end.
более месяца назад
Ваш ответ:
Вы можете из нескольких рисунков создать анимацию (или целый мультфильм!). Для этого нарисуйте несколько последовательных кадров
и нажмите кнопку Просмотр анимации.
