ЕСТЬ ОШИБКИ? program z1; uses crt; var a,b,c:integer y:real; begin crlscr; Writeln('vvedi 3 chisla'); Readln(a,b,c); if a>=0 then y:=a+b+c else if(a0 then y:=exp(a*In(c)) else y:=0; Writeln(y:2:2); readln; end.
Please enter comments
Please enter your name.
Please enter the correct email address.
You must agree before submitting.

Copyright © 2024 SCHOLAR.TIPS - All rights reserved.