Viết chương trình nhập một số a bất kì . Hãy tình căn a nếu a dương . Tính bình phương a và giá trị tuyệt đối của a nếu a âm

1 câu trả lời

program tinh;

uses crt;

var a : integer;

begin

clrscr;

write('nhap so a :');readln(a);

if a > 0 then writeln(' can bac hai cua a la :', sqrt(a));

if a < 0 then writeln('binh phuong cua a la :', sqr(a) ,';',' gia tri tuyet doi cua a la :', abs(a));

readln

end.

Câu hỏi trong lớp Xem thêm