uses crt;
var i,t:longint;
begin
clrscr;
t:=0;
for i:=1 to 2019 do
t:=t+i;
writeln(t);
readln;
end.
Đúng 0
Bình luận (0)
Các câu hỏi tương tự
Bài 1 : Viết chương trình Pascal nhập vào 10 số thực bất kì , in ra màn hình tổng bình phương của các số âm Bài 2 : Viết chườn trình nhập vào số n số tự nhiên đầu tiên , tính tổng các số chẵn có trong dãy số in kết quả ra màn hình Bài 3 : Viết chưng trình nhập vào một mảng các số nguyên bất kì , in ra màn hình các số là số dương mà là số lẻ Giúp mk với mn ơi , mk đang cần gấp Cảm ơn mn nhiều
Đọc tiếp
Bài 1 : Viết chương trình Pascal nhập vào 10 số thực bất kì , in ra màn hình tổng bình phương của các số âm
Bài 2 : Viết chườn trình nhập vào số n số tự nhiên đầu tiên , tính tổng các số chẵn có trong dãy số in kết quả ra màn hình
Bài 3 : Viết chưng trình nhập vào một mảng các số nguyên bất kì , in ra màn hình các số là số dương mà là số lẻ
Giúp mk với mn ơi , mk đang cần gấp Cảm ơn mn nhiều
Viết chương trình nhập vào n số nguyên in ra màn hình tổng các số đó (giúp mình với ạ mình đang cần gấp)
Viết chương trình in ra màn hình tổng các số chẵn nhỏ hơn hoặc bằng N và tổng các số lẽ nhỏ hơn hoặc bằng N. Với N là số tự nhiên N nhập từ bàn phím.Ví dụ: -Input: n6, {1,2,3,4,5,6} - Output: - Tổng số chẵn: 12; - Tổng số lẽ: 9;
Đọc tiếp
Viết chương trình in ra màn hình tổng các số chẵn nhỏ hơn hoặc bằng N và tổng các số lẽ nhỏ hơn hoặc bằng N. Với N là số tự nhiên N nhập từ bàn phím.
Ví dụ: -Input: n=6, {1,2,3,4,5,6}
- Output: - Tổng số chẵn: 12;
- Tổng số lẽ: 9;
1/viết chương trình nhập dãy số gồm 10 số nguyên dương.In ra màn hình số bé nhất (Min)
2/viết chương trình nhập dãy số gồm n số nguyên.
a. Tính tổng các phần tử của dãy.
b. In ra màn hình các phần tử là số chẵn hoặc lẻ.
[Giúp mình với mình đang cần gấp mai là mình thì rồi. Cảm ơn mn trước ạ]
9 tháng 5 2021 lúc 17:03
Đề: Viết chương trình nhập từ bàn phím số nguyên dương n và dãy số từ \(a_1\) , \(a_2\) , ... , \(a_n\) . In ra màn hình tổng các số lẻ có trong dãy số.
P/S: Mọi người giúp mình với, mình đang cần gắp lắm ạ!
viết 1 chương trình thực hiện các yêu cầu sau:
a/Nhập vào dãy số n số tự nhiên bất kì nhỏ hơn 100 từ bàn phím.
b/Tính tích các phần tử của dãy số.
c/Tính tổng các phần tử của dãy số.
d/In ra màn hình số lớn nhất trong các dãy số ở trên.
e/In ra màn hình số lớn nhất trong các dãy số ở trên.
CẦN GẤP Ạ! CẢM ƠN MN!
Câu 18: Viết chương trình in ra 10 chữ “o” trên màn hình (0.5đ)Câu 19: Viết chương trình in ra màn hình thứ tự lần lặp (0.5đ)Câu 20: Viết chương trình tính tổng của N số tự nhiên đầu tiên, với N là số tự nhiên nhập từ bàn phím (1đ)Câu 21: Điền vào chỗ chấm: (0.5d)“ Để viết chương trình chỉ dẫn máy tính thực hiện các hoạt động lặp mà chưa xác định trước được số lần lặp, ta … chưa xác định”Câu 22: Vẽ sơ đồ khối lệnh While – do (0.5đ)Câu 23: Nếu cộng lần lượt n số tự nhiên đầu tiên (n1,2,3,…), ta đ...
Đọc tiếp
Câu 18: Viết chương trình in ra 10 chữ “o” trên màn hình (0.5đ)
Câu 19: Viết chương trình in ra màn hình thứ tự lần lặp (0.5đ)
Câu 20: Viết chương trình tính tổng của N số tự nhiên đầu tiên, với N là số tự nhiên nhập từ bàn phím (1đ)
Câu 21: Điền vào chỗ chấm: (0.5d)
“ Để viết chương trình chỉ dẫn máy tính thực hiện các hoạt động lặp mà chưa xác định trước được số lần lặp, ta … chưa xác định”
Câu 22: Vẽ sơ đồ khối lệnh While – do (0.5đ)
Câu 23: Nếu cộng lần lượt n số tự nhiên đầu tiên (n=1,2,3,…), ta được kết quả
T1=1
T2=1+2
T3=1+2+3
Cần cộng bao nhiêu số tự nhiên đầu tiên liên tiếp để ta nhận được tổng Tn nhỏ nhất nhưng lớn hơn 1000. Viết chương trình (1đ)
Viết chương trình in ra màn hình gtrị tổng cá số tự nhiên lẻ bé hơn hoặc bằng Những, Với số N đc nhập từ bàn phím
viết chương trình nhập vào số tự nhiên N từ bàn phím và in ra màn hình tổng các ước của N