⇢ Дм
Дмитрий
ввод формул в паскале
xsin2,5x
подскажите, как записать эти формулы в турбо паскале!!)
показывает ошибку, как написать правильно? помогите плиз
Евгений Воронцов
program z1;
var
x, y: real;
begin
x := 1;
while x <= 5 do
begin
if x < 2.5 then
y := x * sqrt(x + 2.5)
else
if x > 2.5 then
y := exp(x) * cos(2.5)
else
y := x * sin(2.5 * x);
writeln('x=', x:4:1, 'y=':5, y:8:2);
x := x + 0.5
end
end.
Н:
Наташкин :)
x * sqrt(x+2.5);
exp(x)*cos(2.5);
x*sin(2.5*x)
Похожие вопросы