Viết chương trình Pascal cho biết chữ số hàng chục nghìn,hàng nghìn,hàng trăm,hàng chục,hàng đơn vị của một số có năm chữ số.

linh

2 năm trước

Loga Sinh Học lớp 12

0 lượt thích 31 xem

1 trả lời

Thích Trả lời

minhhai

program chuso;

uses crt;

var n,so:longint;

begin

clrscr;

write('Nhap so co 5 chu so: '); readln(n);

so:=n div 10000;

writeln('Chu so hang chuc nghin la: ',so);

so:=n div 1000;

so:=so mod 10;

writeln('Chu so hang nghin la: ',so);

so:=n div 100;

so:=so mod 10;

writeln('Chu so hang tram la: ',so);

so:=n div 10;

so:=so mod 10;

writeln('Chu so hang chuc la: ',so);

so:=n mod 10;

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

readln;

end.

Vote (0) Phản hồi (0) 2 năm trước

emxuan571994

uses crt;
var n,i:longint;
begin
clrscr;
write('Nhap so co 5 chu so: '); readln(n);
i:=n div 10000;
writeln('Chu so o hang chuc nghin: ',i);
i:=n div 1000;
writeln('Chu so o hang nghin: ',i mod 10);
i:=n div 100;
writeln('Chu so o hang tram: ',i mod 10);
i:=n div 10;
writeln('Chu so o hang chuc: ',i mod 10);
write('Chu so o hang don vi: ',n mod 10);
readln;
end.

Vote (0) Phản hồi (0) 2 năm trước

Các câu hỏi liên quan

What is love? hãy viết khoảng 400-500 từ về chủ đề này

Hoà tan một lượng Fe vào 900ml dung dịch HCl 2M. a. Viết phương trình phản ứng. b. Tính khối lượng các chất thu đựoc sau phản ứng? c. Tính nồng độ Mol của muối thu được trong dung dịch sau phản ứng? d. Tính khối lượng sắt đã tham gia phản ứng.

Lớp 6A đi từ thiện tại Bệnh viện Huyết Học, Ban tổ chức cần mua 200 hộp sữa và 50 gói bánh. Biết rằng một hộp sữa giá 5000 đồng, một gói bánh giá 25000 đồng. Cửa hàng khuyến mại mua 5 hộp sữa được tặng 1 hộp, mua 10 gói bánh được tặng 1 gói. Hỏi tổng số tiền Ban tổ chức phải trả là bao nhiêu? Giải giúp mình vs.

Ve chibi trên giấy ko ô li 1 pic kí 1 pic ko kí Có màu

trên nửa đường tròn đường kính AB lấy 2 điểm N, Q (không trùng với A, B) sao cho điểm N thuộc Q cung AQ. Gọi M là giao điểm của AN và BQ, P là giao điểm của BN và AQ a, Chứng minh tứ giác MNPQ nội tiếp b, Chứng minh MN. MA=MQ. MB c, Chứng minh MP vuông góc với AB d, Chứng minh AD là tiếp tuyến của đường tròn ngoại tiếp tứ giác MNPQ

Câu 43 44 đáp án là gì vậy ạ ??

Giúp mình ít nhất là 2 câu với ạ , mình cảm ơn

giúp tớ 8 câu này vs ạ.tớ cảm ơn

Các bạn giúp mình với, ngày mai mình thi rồi!! Nhất là ý b với ý c ấy ạ.

ae lm hộ vs mk cần gấp ........................

Loga.vn - Cộng Đồng Luyện Thi Trực Tuyến