Написать программу, которая выводит в порядке возрастания все правильные несократимые дроби - Pascal ABC

Формулировка задачи:

Нужно решить задачу, включив требуемые процедуры и функции в состав модуля Unit. Требуется написать программу, которая выводит в порядке возрастания все правильные несократимые дроби, знаменатели которых не превосходят N (2<=N<=500).

Код к задаче: «Написать программу, которая выводит в порядке возрастания все правильные несократимые дроби - Pascal ABC»

textual
uses crt,ryad;
var n,k:integer;
begin
write('n=');
readln(n);
k:=0;
f(0,1,1,1,1,n+1,k);
end.
Эта работа вам не подошла?

Вы всегда можете заказать любую учебную работу у наших авторов от 20 руб.

9   голосов, оценка 3.667 из 5


СДЕЛАЙТЕ РЕПОСТ
Похожие ответы