Y= {0 при x≤0 {x² при x>0 Запустить программу и выполнить при таких условиях: 1)при x= -2 Ответ:0 2)при x=2 Ответ: 4 Мне нужна программа,срочно
В PascalABC
Var X,Y:real; Begin Write('x = ');ReadLn(x); if x <= 0 then Y:=0<br>else Y:=X*X; WriteLn('Y = ',Y); End.
Огромное спасибо