1 câu trả lời
uses crt;
var a : real;
begin
clrscr;
readln(a);
a := a * a;
a := a * (a / sqrt(a));
a := a * a;
write(a : 0 : 0);
readln
end.
uses crt;
var a : real;
begin
clrscr;
readln(a);
a := a * a;
a := a * (a / sqrt(a));
a := a * a;
write(a : 0 : 0);
readln
end.