решить задачу
D - Обыкновенные дроби
Максимальное время работы на одном тесте: 2 секунды
Максимальный объем используемой памяти: 64 мегабайта
Имя входного файла: input.txt
Имя выходного файла: output.txt
Вам даны две обыкновенные дроби: A/B и C/D, с которыми нужно произвести арифметическое действие и представить результат в виде несокращаемой дроби или целого числа.
Числители целые и не превосходят 10⁹ по модулю.
Знаменатели целые, положительные и не превосходят 10⁹.
Входные данные
На единственной строке через пробел:
числитель первой дроби A,
знаменатель первой дроби B,
арифметическое действие, одно из:
add — сложить A/B и C/D,
subtract — из A/B вычесть C/D,
multiply — умножить A/B на C/D,
divide — разделить A/B на C/D.
числитель второй дроби C,
знаменатель второй дроби D.
Выходные данные
Единственное число, если результат — целое число.
Числитель и через пробел знаменатель результата, если результат — дробь.
var a,b,c,d: integer; {объявление переменных a,b,c и говорим что они целые}
begin {начало}
writeln('введите три числа'); {запрос чисел}
readln(a,b,c); {ввод чисел}
d:=a*b*c; {умножаем числа и присваиваем d их значение}
if (d<50) then {если произведение чисел меньше 50 то}
a:=a*10; {первое число умножаем на десять}
b:=b*10; {второе число умножаем на десять}
c:=c*10; {третье число умножаем на десять}
writeln(a); {выводим первое}
writeln(b); {выводим второе}
writeln(c); {выводим третье}
else {иначе}
writeln(d); {выводим произведение}
end. {конец}
P.S. этот символ { } паскаль не читает и означает он коментарий