1.

Даны два

натуральных числа M и N - числитель и знаменатель дроби M/N.

Требуется сократить дробь, насколько это возможно.

Question

Информатика

Володя

6 июня, 09:47

1.

Даны два

натуральных числа M и N - числитель и знаменатель дроби M/N.

Требуется сократить дробь, насколько это возможно.

+4

Ответы (1)

Знаете ответ на вопрос?

Аза · Answer 1

Var n, m, q, i:integer; f:boolean;

begin

read (m, n) ;

f:=true;

while f=true do begin

f:=false;

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

for i:=2 to q do begin

if (m mod i = 0) and (n mod i = 0) then begin m:=m div i; n:=n div i; f:=true; end;

end;

end;

writeln (m,'/', n) ;

end.

По идее так, не проверял.

1.Даны дванатуральных числа M и N - числитель и знаменатель дроби M/N.Требуется сократить дробь, насколько это возможно.

1.

Даны два

натуральных числа M и N - числитель и знаменатель дроби M/N.

Требуется сократить дробь, насколько это возможно.