in ra màn hình số đối của n n là số nguyên nhập từ bàn phím
2 câu trả lời
program bai_giai;
uses crt;
var n:longint;s:string;
begin
clrscr;
write('n=');readln(n);
if(n>0)then write('so doi cua ',n,' la:-',n)else
begin
str(n,s);
delete(s,1,1);
write('so doi cua ',n,' la:',s);
end;
readln
end.
var n:longint;
begin
read(n);
if n>0 then write(-n);
if n<0 then write(-n);
readln;
readln;
end.
Câu hỏi trong lớp
Xem thêm