Найти для натур. N находит все обыкновенные несократимые дроби со знаменателем не превосходящим N - Pascal
Формулировка задачи:
Всем доброго вечера!!!!
Задачка такая:
Составить программу, которая для заданного натурального числа N находит все обыкновенные несократимые дроби со знаменателем не превосходящим N. Не допускается использование функций преобразования типов и строчных функций.
Заранее спасибо.
Никто не поможет?
Решение задачи: «Найти для натур. N находит все обыкновенные несократимые дроби со знаменателем не превосходящим N»
textual
Листинг программы
for i:=2 to n do{если брать дроби вида 1/1 2/1 то for i:=1...}
for j:=1 to i-1 do