Viết chương trình nhập một số từ bàn phím và in ra màn hình trị tuyệt đối của số đó.

2 câu trả lời

=> abs(a) trả về giá trị tuyệt đối của số a

* Viết chương trình :

program td;

uses crt;

var a : integer;

begin

clrscr;

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

writeln('gia tri tuyet doi cua', a ,'la :', abs(a));

readln

end.

Program FNG;
Uses crt;
Var n: longint;
Begin
        Clrscr;
        Write('Nhap n: '); Readln(n);
        Write('|',n,'| = ',abs(n));
        Readln
End.