
Hunin
6 год назад
Нужно скласть блок-схему алгоритму

ОТВЕТЫ

Elisaveta
Oct 24, 2020
PROGRAM B03;
VAR
x,a,b,c,y:real;
BEGIN
x := 0.35;
c := 0.8;
b := c * x*x + 1;
a := x + 0.52*b;
y := sqrt(x*x*x + a*x*x + b*x + c);
writeln('sqrt(x*x*x + a*x*x + b*x + c) = ', y);
END.
VAR
x,a,b,c,y:real;
BEGIN
x := 0.35;
c := 0.8;
b := c * x*x + 1;
a := x + 0.52*b;
y := sqrt(x*x*x + a*x*x + b*x + c);
writeln('sqrt(x*x*x + a*x*x + b*x + c) = ', y);
END.
- спасибо большое
127
Смежные вопросы: