Var a,b,c,d: Real;
begin
writeln('a=');
read(a);
write('b=');
read(b);
write('c=');
read(c);
d:=(Power(a,b)*c);
writeln(d);
end.
Boshqa variant yu