Ответ(ы) на вопрос:
Гостьvar x,y:real;
begin
Writeln('введите значение x');
Readln(x);
y:=sqr(x+1)+3*(x+1);
Writeln('y=',y);
readln;
end.
Не нашли ответ?
Похожие вопросы
Гость