Program tinhtong;
var: i,s:=longint;
Begin
i:=-1;
While i<50 do
Begin
i:=i+2;
S:=S+i;
End;
readln;
End.
Đúng 0
Bình luận (0)
Bài 8. Lặp với số lần chưa biết trước
Các câu hỏi tương tự
Hãy viết chương trình tính tổng các số tự nhiên chẵn từ 1 đến N( sử dụng lệnh While ... do )
có thể giải nhanh đc ko ạ
Viết chương trình sử dụng lệnh lặp while....do... để đếm các số tự nhiên chia hết cho 5 từ 1 -> n được nhập từ bàn phím
[ Em hãy viết chương trình sử dụng vòng lặp While...do để tính các số chẵn trong phạm vi từ 1 đến N. Với N được nhập từ bàn phim. ]
giải giúp mik ik mn, cảm mơn nhìu
Viết chương trình sử dụng câu lệnh lặp với số lần chưa biết trước in ra các số lẻ từ 1 đến 10
Xem chi tiết
Câu 1: viết chương trình tích P của các số tự nhiên nhỏ hơn bằng 5Câu 2: viết chương trình tính tích các số tự nhiên lẻ từ 1 đến 10 Câu 3: viết chương trình tính tổng các số tự nhiên chẵn từ 1 đến nGiúp với , theo kiểu câu lệnh while do
Xem chi tiết
Viết chương trình sử dụng lệnh lặp While ... do ... để thực hiện công việc sau
- Nhập vào số nguyên n (10<n<100)
-In ra màn hình tất cả các ước của n
-Tính tổng và thông báo các ước của n là số chẵn
Viết chương trình pascal sử dụng lệnh while...do hoặc for to do để tính tổng S=1+3+5+...+n. N là số nguyên nhập từ bàn phím
Viết chương trình pascal sử dụng lệnh while...do hoặc for to do để tính tổng S=1+1/2+1/3+...+1/n. N là số nguyên nhập từ bàn phím
Viết chương trình pascal sử dụng lệnh while...do hoặc for to do để tính tổng S=1+1/2²+1/3²+...+1/n². N là số nguyên nhập từ bàn phím