Bài 1: Nhập vào số nguyên n, xuất ra màn hình. Số đảo ngược của n. Kiểm tra n có phải là số đối xứng không? Tổng các chữ số của n là số chẵn hay số lẻ

int main()

{

int n;

int SoNghichDao = 0;

do

{

printf(“\nNhap n: “);

scanf(“%d”, &n);

}while(n < 0 && printf(“\nLoi: (n >= 0)”));

printf(“\nSo dao nguoc cua %d la: “, n);

do {

printf(“%d”, n % 10);

}while(n /= 10); // tương đương n = n / 10; n != 0;

// có thể viết

/*do

{

SoNghichDao = SoNghichDao * 10 + n % 10;

n /= 10;

}while(n != 0);

printf(“\n%d”, SoNghichDao);*/

getch();

return 0; }

.

PASCAL

readln(n);
while n<>0 do
begin
S:=S*10+n mod 10;
n:=n div 10;
end;
writeln(‘xuat ket qua: ‘,S);
readln;
end.
P/s có thể cho thêm 1 đề bài nhủ thế này nữa: nhập n cho biết n phải số đối xứng ko? (VD: 12321 là số đối xứng, 12334:hok là số đối xứng);
Bài giải:
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 xung’)
else writeln(‘khong doi xung’);
readln;
end.

Gửi bạn:

uses crt;

var n: integer;

begin

clrscr;

writeln('nhap so nguyen n'); readln(n);
while n<>0 do
begin
S:=S*10+n mod 10;
n:=n div 10;
end;
writeln(‘ket qua la: ‘,S);
readln
end.

CHÚC BẠN HỌC TỐT