Размещено 4 года назад по предмету
Информатика
от polinaandriivnank
Поставить у правельную последовательность:
Program Fynksija;
Var x, y: real;
else if (x>--10) and (x<- 10)
else y:32*x+1;
if x<-10
then y:3D 3*x*x*x - х*x
Writeln (y3D', y:4:2);End.
then y:3D sqrt(10-х)
Begin
Write('x=');
ReadLn(x);