Viết chương trình nhập số nguyên n rồi hiển thị các chữ số của số đó
0 bình luận về “Viết chương trình nhập số nguyên n rồi hiển thị các chữ số của số đó”
uses crt; var str: string; i:byte; begin clrscr;e write(‘Nhap so cua ban: ‘); readln(str); write(‘Ket qua: ‘); for i:=1 to length(str)-1 do write(str[i],’, ‘); writeln(str[length(str)],’.’); readln end.
uses crt;
var str: string; i:byte;
begin
clrscr;e
write(‘Nhap so cua ban: ‘);
readln(str);
write(‘Ket qua: ‘);
for i:=1 to length(str)-1 do
write(str[i],’, ‘);
writeln(str[length(str)],’.’);
readln
end.
không biết đúng không nữa , sai thì thông cảm nha