04:51:11 pm Ngày 09 Tháng Tư, 2024
Diễn đàn đã ngưng hoạt động và vào chế độ lưu trữ.
Mời tham gia và trao đổi trên nhóm Facebook
>> TẠI ĐÂY <<
Tìm là có
>>
Trang chủ
Diễn đàn
Diễn Đàn Vật Lý | Thư Viện Vật Lý
>
CÁC KHOA HỌC KHÁC
>
TIN HỌC
(Các quản trị:
tinhoc
,
Mclaren-Bi
) >
[Code] Giúp đỡ về tổng số có ba chữ số trong Pascal.
[Code] Giúp đỡ về tổng số có ba chữ số trong Pascal.
Trang:
1
Xuống
« Trước
Tiếp »
In
Tác giả
Chủ đề: [Code] Giúp đỡ về tổng số có ba chữ số trong Pascal. (Đọc 3099 lần)
0 Thành viên và 0 Khách đang xem chủ đề.
Alexman113
Lão làng
Nhận xét: +26/-9
Cảm ơn
-Đã cảm ơn: 229
-Được cảm ơn: 270
Offline
Bài viết: 551
KK09XI
[Code] Giúp đỡ về tổng số có ba chữ số trong Pascal.
«
vào lúc:
06:43:32 pm Ngày 14 Tháng Chín, 2012 »
Viết chương trình nhập vào một số nguyên có nhiều nhất ba chữ số. Tính tổng các chữ số của số nguyên đó. (Em mới học đến các phép toán bình thường chưa học đến các hàm, cấu trúc... với lại bài này Thầy có nói là liên quan đến DIV MOD ạ)
Logged
KK09XI ~ Nothing fails like succcess ~
Mclaren-Bi
Moderator
Thành viên danh dự
Nhận xét: +8/-5
Cảm ơn
-Đã cảm ơn: 97
-Được cảm ơn: 112
Offline
Giới tính:
Bài viết: 390
We do not forgive- We do not forget- Expect us
Trả lời: [Code] Giúp đỡ về tổng số có ba chữ số trong Pascal.
«
Trả lời #1 vào lúc:
09:35:28 pm Ngày 14 Tháng Chín, 2012 »
Thế này nhé, mình giải ra bài mẫu rồi các bài sau áp dụng tương tự nhé
Program BT;
Uses Crt;
Var S,T,a,b,c:integer;{a,b,c lan luot la cac chu so o hang tram,chuc,don vi}
Begin
Clrcsr;
Write(' Nhap so nguyen:'); Readln(S);
a:= S div 100;
b:=(Smod 100) div 10;
c:=(S mod 100) mod 10;
T:=a+b+c;
writeln('Tong cac chu so la',T:2);
Readln
End.
Logged
Đừng cố gắng những gì ngoài tầm với...
Mây của trời hãy để gió cuốn đi
Tags:
Trang:
1
Lên
In
« Trước
Tiếp »
Chuyển tới:
Chọn nơi chuyển đến:
Loading...