Giúp mik Pascal vs: Viết chương trình nhập số nguyên dương X có 2 chữ số, in ra màn hình cho biết số hàng chục và đơn vị của số X?

1 câu trả lời

Program BTT;
Uses crt;
Var x: 10..99;
Begin
        Clrscr;
        Write('Nhap so co 2 chu so: '); Readln(x);
        Writeln('Chu so hang chuc: ',x div 10);
        Write('Chu so hang don vi: ',x mod 10);
        Readln
End.

Câu hỏi trong lớp Xem thêm