Question

Составить программу для вычесления выражения. Спросить числа a b c .
1)x=a+b:c^2
2) y=a^3+b^2-c:a×b×c

Answer 1

var a,b,c:integer;
x,y:real;
begin
  Read(a,b,c);
x:=a+b/sqr(c); Writeln('x=',x); 
y:=a*a*a+sqr(b)-c/a*b*c;
Writeln('y=',y);
end.