Question

Viết chương trình nhập vào số có hai chữ số. Hãy in ra màn hình chữ số hàng chục, đơn vị của hai số đó.

(Cho em hỏi là để chạy chương trình bằng bàn phím thì ta nhấn phím nào ạ?)

Answer 1

Program hotrotinhoc;

var a,b: integer;

begin

write('Nhap so :'); readln(a);

writeln('Chu so hang chuc :',a mod 10);

write('Chu so hang don vi :', a div 10);

readln

end.

Answer 2

Cách chạy chương trình bằng bàn phím:

-Cách 1: bạn nhấn ctrl+f9

-Cách 2: bạn nhấn alt+r+enter

Code nhập vào số có hai chữ số, xuất chục , đơn vị của số đó là:

uses crt;

var a,dv,ch:integer;

begin

clrscr;

write('nhap a='); readln(a);

dv:=a mod 10;

ch:=a div 10; ch:=ch mod 10;

if (a>=10) and (a<=99) then

begin

writeln('chu so hang don vi la: ',dv);

writeln('chu so hang chuc la: ',ch);

end

else writeln('vui long nhap so co hai chu so');

readln;

end.