Можно уточнить именно плюсы и минусы чего? Суперкомпьютера или ПК? Или того и другого
Var a,b,i,n: integer;
begin
a := 1;
b := 1;
read(n);
for i := 2 to n do
begin
b := a + b;
a := b - a
end;
write(b)
end.
2)Примерно на 820 дискетах. 4096мб/ 5мб ~ 820
1. Перемножаем знаменатели b и d, ставим его в знаменатель результата.
2. Умножаем a на d и c на b.
3. Полученные произведения складываем, сумма будет числителем результата.
4. Находим наибольший общий делитель числителя и знаменателя.
5. Делим на него числитель и знаменатель, сокращая тем самым дробь.