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

program zz1;var x,y:real; // задаем переменные нецелого типаbeginwhile x<=20 do // организуем цикл, в котором будем перебирать все числа по х от 0 до 20beginy:=sqr(x)-1; // вычисляем значение функцииx:=x+0.1; // берем следующее число хwriteln(\'при х=\',x:5:1, \' y=\',y:8:2); // выводим ответ в формате, для х один знак после запятой, для у - два знака после запятой, для всего числа х пять позиций, для у - восемьend;end.