Bài 7. Câu lênh lặp

Bạn chưa đăng nhập. Vui lòng đăng nhập để hỏi bài
Nguyễn Thị Vân Trang

Ai bít câu trả lời thì cho mình hỏi vs: Viết CT nhập vào 1 số tự nhiên , cho bt số đó có bao nhiêu ước, tính tổng của chúng và các ước của số đó. Ví dụ: ước của 6 là 1 2 3 6, có 4 ước và tổng là 12

Nguyễn Tấn Tài
13 tháng 2 2017 lúc 21:49

Hỏi đáp Tin học

Nguyễn Tấn Tài
16 tháng 2 2017 lúc 20:54

Bài 7. Câu lênh lặp

Nguyễn Thị Vân Trang
13 tháng 2 2017 lúc 19:34

giúp mình vs nha vui

Giao Huỳnh
9 tháng 4 2017 lúc 21:28

program tong
uses crt;
var n,i,tong,dem:integer;
begin clrscr; write('nhap so tu nhien:');readln(n); dem:=0; tong:=0;
for i:=1 to n do if n mod i = 0 then begin dem:=dem+1; tong:=tong+i; writeln(i,' la uoc cua ',n); end; writeln(n,' co ',dem,' uoc so'); write('tong cua cac uoc so la:',tong);
readln;banhqua
end.

Giao Huỳnh
9 tháng 4 2017 lúc 21:30

program tong
uses crt;
var n,i,tong,dem:integer;
begin

clrscr;

write('nhap so tu nhien:');readln(n); dem:=0; tong:=0;
for i:=1 to n do if n mod i = 0 then begin dem:=dem+1; tong:=tong+i; writeln(i,' la uoc cua ',n); end; writeln(n,' co ',dem,' uoc so'); write('tong cua cac uoc so la:',tong);
readln;banhqua
end.

Các câu hỏi tương tự
Kỳ AnH
Xem chi tiết
Yna Lolipop
Xem chi tiết
Bao Duong
Xem chi tiết
Minh Ngọc
Xem chi tiết
Lê Bích Thủy
Xem chi tiết
Phan Thị Ka
Xem chi tiết
Giang Trịnh VLog
Xem chi tiết
Sinphuya Kimito
Xem chi tiết
Nguyễn Thị Vân Trang
Xem chi tiết