viết chương trình nhập một số từ bàn phím trị tuyệt đối của số đó 26/07/2021 Bởi Nevaeh viết chương trình nhập một số từ bàn phím trị tuyệt đối của số đó
program tritd; uses crt; var n:integer; begin clrscr; write(‘Nhap so: ‘); readln(n); write(‘Gia tri tuyet doi cua ‘,n,’ la: ‘); if n>=0 then n:=n else n:=-n; write(n); readln end. Bình luận
uses crt;
var n:longint;
begin
clrscr;
write(‘n=’);readln(n);
writeln(abs(n));
readln
end.
program tritd;
uses crt;
var n:integer;
begin
clrscr;
write(‘Nhap so: ‘);
readln(n);
write(‘Gia tri tuyet doi cua ‘,n,’ la: ‘);
if n>=0 then n:=n
else n:=-n;
write(n);
readln
end.