"viết chương trình nhập vào số tự nhiên có hai chữ số và xuất ra số đảo ngược" giải theo cách của lớp 8 nhé tks
2 câu trả lời
var s,s1:string;
i:byte;
begin
write('Nhap xau: '); readln(s);
for i:=length(s) downto 1 do
s1:=s1+s[i];
write('Xau dao nguoc la: ',s1);
readln;
end.
(nếu ai chưa có nhóm thì tham gia này)
Program BTH;
uses crt;
var n,a,b:longint;
Begin
clrscr;
write('Nhap n: ');readln(n);
a:= n mod 10;
b:= n div 10;
write('So dao nguoc la: ',a,b);
readln;
end
Câu hỏi trong lớp
Xem thêm