Написать программу для Паскаля.

Написать программу для Паскаля.
Гость
Ответ(ы) на вопрос:
Гость
Var  y,x:real;  i:integer; Begin  For i := 1 to 10 do Begin    x:=i;    y:=(3*sqr(x)-sqrt(x+1))/(2-x);    writeln('X',i,' = ',x,', Y',i,' = ',y);  End; End.
Не нашли ответ?
Ответить на вопрос
Похожие вопросы