Найти значения функции - Pascal (80935)

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

найдите значения функции y=x2-1,для x=0.1,0.2,0.3...,20.Задайте форматированный вывод для x всего 5 знаков,из них после запятой-один,для y всего восемь знаков,из них после запятой-два.

Решение задачи: «Найти значения функции»

Листинг программы

var i: integer;
begin
  for i := 1 to 200 do writeln(i / 10:5:1, i * i / 100 - 1:8:2);
  readln
end.

Объяснение кода листинга программы

В данном коде происходит вычисление значений функции для чисел от 1 до 200. Переменная i является целочисленной и принимает значения от 1 до 200. В цикле for выполняется последовательное вычисление двух выражений:

Число i делится на 10, результат округляется в меньшую сторону (до 0), затем выводится на экран.
Число i умножается на само себя, результат вычисляется в десятичной форме, затем выводится на экран. Разница между этим значением и 1 вычитается из результата первого выражения. Это позволяет получить значение, которое находится в середине между результатами первого и второго выражений. После выполнения всех вычислений программа просит пользователя ввести данные для следующей итерации.