Составить программу y= a+5, если a =0, 1/a, если - вопрос №50105281976 от adelifanku2 28.02.2021 18:23

Question

Информатика: Составить программу y= a+5, если a =0, 1/a, если 0 в остальных случаях

adelifanku2 · Answer

Var a,y:real; beginreadln(a);if (a =0)then y:=a+5 elseif (a 0) and (a 1)then y:=1/a else y:=sqr(a);print(y);end....

Составить программу y= a+5, если a< =0, 1/a, если 0 в остальных случаях