Составить программу y= a+5, если a =0, 1/a, если - вопрос №52826535010 от D10A 19.08.2021 13:06

Question

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

D10A · 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 в остальных случаях