Viết chương trình nhập vào số n in ra màn hình số đảo ngược của n?
Quảng cáo
1 câu trả lời 125
program bai1;
var n,t:longint;
s:real;
begin
write(‘N=’);readln(n);
t:=n;
while n<>0 do
begin
S:=S*10+n mod 10;
n:=n div 10;
end;
if S=t then writeln(‘so doi xưng’)
else writeln(‘khong doi xung’);
readln;
end.
Quảng cáo
Bạn cần hỏi gì?
Câu hỏi hot cùng chủ đề
-
Đã trả lời bởi chuyên gia
149631 -
Đã trả lời bởi chuyên gia
99998 -
Đã trả lời bởi chuyên gia
97612 -
Đã trả lời bởi chuyên gia
80300 -
Đã trả lời bởi chuyên gia
73097 -
Đã trả lời bởi chuyên gia
56190 -
Đã trả lời bởi chuyên gia
55568
Gửi báo cáo thành công!
