Помогите со вторым пожалуйста. В информатике я чайник - поэтому желательно так, чтобы я досконально списал в Паскаль
Помогите со вторым пожалуйста. В информатике я чайник - поэтому желательно так, чтобы я досконально списал в Паскаль
Гость
Ответ(ы) на вопрос:
ГостьVar x;y:real;
Begin
Readln(x);
y:=((x-2,5)*x-1)*x-1;
Writeln(y);
End.
Var X1,x2,y1,y2,d:real;
Begin
Readln(X1,x2,y1,y2);
D:=SQRT(SQR(x2-x1)+SQR(y2-y1));
Writeln(d);
End.
Не нашли ответ?
Похожие вопросы