Написать программу нахождения значений функции y и вывода результата с точностью до 0.01

алгоритм + программа паскаль​

// PascalABC.NET 3.2, сборка 1439 от 09.05.2017
// Внимание! Если программа не работает, обновите версию!

function ДробьНесократима(Чис,Знам:integer):boolean;
begin
  while Знам<>0 do begin Чис:=Чис mod Знам; Swap(Чис,Знам) end;
  Result:=Чис=1
end;

begin
  for var Знаменатель:=2 to 7 do
    for var Числитель:=1 to Знаменатель-1 do
      if ДробьНесократима(Числитель,Знаменатель) then
        Write(Числитель,'/',Знаменатель,' ');
  Writeln
end.

Результат
1/2 1/3 2/3 1/4 3/4 1/5 2/5 3/5 4/5 1/6 5/6 1/7 2/7 3/7 4/7 5/7 6/7

Формат JPEG – самый распространенный формат, читаемый всеми программами. Фотофайлы в таком формате могут размещаться в интернете и печататься. При сохранении в JPEG, качество можно определять самому (например, работая в Photoshop, самое низкое и самое высокое качество, соответственно, 1 и 12). Недостатками этого формата является то, что при каждом сохранении изображения оно сжимается и теряет часть информации, а слои объединяются и последние изменения уже отменить не получится. 

Я тебе не советую JPEG 
Лучше программа PNG 
Вот почему 
Формат PNG – создает файлы с меньшим размером и без потерь в качестве. Применяется при управлении прозрачностью. Совместно с форматом GIF, очень часто PNG используют для графики. Файлы, сохраненные в таком формате, загружаются в интернет без проблем.