|
zadach421.BAS |
|
{* Задача421 *}REM basic ' Составить программу сокращающую обыкновенные дроби' входные данные: два целых числа - числитель и знаменатель дроби.' выходные данные: два целых числа - числитель и знаменатель скрашенной дроби.INPUT a, b
c = a
d = b
If c < d Then SWAP c, d
Do While c 0 And d 0
c = c Mod d
SWAP c, d
Loop
PRINT a / c; "/"; b / c
End
|