uses crt;
var x,i,n,t:integer;
begin
clrscr;
t:=0;
repeat
readln(x);
t:=t+x;
until t>200;
writeln(t);
readln;
end.
Đúng 0
Bình luận (0)
Bài 10: Cấu trúc lặp
Các câu hỏi tương tự
1.viết chương trình nhập vào mảng A gồm N phần tử (N 500) từ bàn phím. Sau đó, tính tổng các phần tử âm chia hết cho cho 72.viết chương trình nhập vào mảng C gồm 10 phần tử từ bàn phím. Sau đó xuất ra các phần tử là số nguyên tố3.viết chương trình tạo nhập vào mảng D gồm K phần tử (K 200) từ bàn phím. Sau đó cho biết có bao nhiêu phần tử chẵn có 2 chữ sốmn giúp em giải với ạ
Đọc tiếp
1.viết chương trình nhập vào mảng A gồm N phần tử (N<= 500) từ bàn phím. Sau đó, tính tổng các phần tử âm chia hết cho cho 7
2.viết chương trình nhập vào mảng C gồm 10 phần tử từ bàn phím. Sau đó xuất ra các phần tử là số nguyên tố
3.viết chương trình tạo nhập vào mảng D gồm K phần tử (K<= 200) từ bàn phím. Sau đó cho biết có bao nhiêu phần tử chẵn có 2 chữ số
mn giúp em giải với ạ
Viết chương trình kiểm tra số nguyên N bất kỳ nhập vào từ bàn phím là số âm hay số dương.
viết chg trình nhập từ bàn phím số nguyên dương N hãy tính và đưa ra màn hình tổng các số chia hết cho 3 trong đoạn từ 1 đến N
Giúp em gấp mn ơi Viết chương trình in ra các số chẵn nhỏ hơn hoặc bằng n ( với n được nhập từ bán phím) sao cho 15 số được in trên một dòng
Viết chương trình tinh tổng S=1+2+4+6+...+N (N<10^4, n là số nguyên được nhập từ bàn phim)
Lập tính tính tổng :
Nhập số nguyên N vào từ bàn phím . Tính tổng các chữ số của N .
Viết chương trình nhập vào mảng A gồm N phần tử (N<= 500) từ bàn phím giá trị các phần tử là các số nguyên đưa ra màn hình mảng vừa nhập với thứ tự các phần tử ngược lại, nhập 3, 6, 8 đưa ra 8, 6, 3. Đếm số phần tử có giá trị lớn hơn 10. Đưa ra màn hình số lượng số nguyên tố trong mảng
Viết phương trình tính giá trị biểu thức y:=ax+b (với a,x,b nguyên nhập từ bàn phím). Kiểm tra xem y là số chẵn hay lẻ
Xem chi tiết
Viết chương trình tính tổng của một cấp số cộng có n phần tử biết phần tử thứ nhất là A và D là công sai được nhập từ bàn phím.
Gợi ý:
- Tổng n số hạng của cấp số cộng là: Sn=n(A+D)/2