Напишите программу ,выходящую значение y для вводимого с клавиатуры значения x для функции y=(x-2)^2
В комментариях смотрите, сюда код программы не правильно скидывается.
Program znach; Var x, y:real; begin writeln('Введите число'); readln(x); y:=sqr(x-2); writeln('Ответ:',y); end.
А число и ответ ,я должен сам придумать ?