Program HOC24;
var x: real;
begin
write('Nhap x: '); readln(x);
if x>0 then write(x:5:2);
if x<0 then write(sqr(x):5:2);
readln
end.
Đúng 1
Bình luận (0)