Question

Помогите с информатикой. Очень срочно!!!

Answer 1

Так мало баллов, никто не согласится делать три программы за 8 баллов. Номер 5. Program y; Var a, y, x:real; begin Writeln ('vvedite chislo x'); Readln (x); If x<-1 then y:=2*sqr(x)+4*x Else y:=sqrt(5-2*x); Writeln ('y raven',y,'!'); Readln; End.

Answer 2

Давай хотя бы 4 и 5

Answer 3

Щас 5 сделаю