Var i,n:integer;
s:longint;
Begin
Write('n = ');readln(n);
For i:=1 to n do
s:=s+i;
Write('Tong la ',s);
Readln;
End.
Đúng 2
Bình luận (0)
Các câu hỏi tương tự
Viết chương trình bằng ngôn ngữ lập trình Pascal để nhập vào N số nguyên từ bàn phím, tính tổng của các số vừa nhập và in ra màn hình giá trị tổng.
Em hãy viết ct máy tính bằng ngôn ngữ lập trình pascal để tính giá trị của 2^n (với n là số tự nhiên nhập từ bàn phím)
Biết rằng: 2^n=2*2*2...2
Giúp mình với
Phần II. Tự luận.
Sử dụng ngôn ngữ lập trình Pascal, viết chương trình giải các bài toán:
1. Cấu trúc rẽ nhánh.
Bài 1. Tính tổng, hiệu, tích, thương của hai số bất kì được nhập từ bàn phím.
Bài 2. Tính chu vi và diện tích của hình chữ nhật, biết chiều dài và chiều rộng được nhập vào từ bàn phím.
Bài 3. Tính chu vi và diện tích của hình tròn biết độ dài bán kính được nhập vào từ bàn phím.
2. Cấu trúc rẽ nhánh.
Bài 4. Nhập vào hai số bất kì. So sánh và in ra màn hình số lớn, số nhỏ của hai số.
Ví...
Đọc tiếp
Phần II. Tự luận. Sử dụng ngôn ngữ lập trình Pascal, viết chương trình giải các bài toán: 1. Cấu trúc rẽ nhánh. Bài 1. Tính tổng, hiệu, tích, thương của hai số bất kì được nhập từ bàn phím. Bài 2. Tính chu vi và diện tích của hình chữ nhật, biết chiều dài và chiều rộng được nhập vào từ bàn phím. Bài 3. Tính chu vi và diện tích của hình tròn biết độ dài bán kính được nhập vào từ bàn phím. 2. Cấu trúc rẽ nhánh. Bài 4. Nhập vào hai số bất kì. So sánh và in ra màn hình số lớn, số nhỏ của hai số. Ví dụ: Nhập vào hai số: 56 45 Số lớn là 56, số nhỏ là 45 Bài 5. Nhập vào một số nguyên bất kì. Kiểm tra và in ra màn hình thông báo số đó là số chẵn hay số lẻ. Ví dụ: Nhập vào một số cần kiểm tra: 45 Số vừa nhập là số lẻ. Bài 6. Nhập vào 3 số bất kì. Kiểm tra và in ra màn hình thông báo xem 3 số đó có tạo thành 3 cạnh của một tam giác không? Ví dụ: Nhập vào 3 số cần kiểm tra: 3 4 5 Ba số vừa nhập thỏa mãn là 3 cạnh của một tam giác. Hay: Nhập vào 3 số cần kiểm tra: 8 2 5 Ba số vừa nhập không thỏa mãn là 3 cạnh của một tam giác. 3. Cấu trúc lặp. Bài 7. Tính tổng dãy số: S=1+2+3+…+n (Với n là một số tự nhiên được nhập vào từ bàn phím) (Với n là một số tự nhiên được nhập vào từ bàn phím) 4. Dãy số và biến mảng. Bài 8. Nhập vào họ và tên và điểm trung bình của 36 học sinh lớp 8B. Bài 9. Nhập vào họ và tên, điểm toán, điểm văn của 38 học sinh lớp 8A.
Câu 1. Viết chương trình tính tổng các số lẻ từ 1 đến n ( n nhập từ bàn phím).
Câu 2. Viết chương trình tính tổng các số chẵn từ 1 đến n ( n nhập từ bàn phím).
help me, pls
Hãy viết chương trình tính tổng tích, của các số tự nhiên từ 1 đến N (n được nhập từ bàn phím) bằng cách dùng câu lệnh For...do hoặc While...do?
Bài 1: Viết chương trình Pascal nhập số từ bàn phím. Xuất ra màn hình:+ Tính n!+ Nhập số x từ bàn phím.Tính nxBài 2: Viết chương trình Pascal nhập số n từ bàn phím. Xuất ra màn hình + Dòng 1: Các ước của n+ Dòng 2: Nếu n là số lẻ thì xuất ra màn hình các số nguyên tố từ 2 đến n+ Dòng 3: Nếu n là chẵn thì xuất ra màn hình các số hoàn hảo từ 1 đến n+ Dòng 4: Tổng các ước của n( 2 bài khác nhau mọi người làm riêng ra giúp mình ạaaaaaa)
Đọc tiếp
Bài 1: Viết chương trình Pascal nhập số từ bàn phím. Xuất ra màn hình:
+ Tính n!
+ Nhập số x từ bàn phím.Tính nx
Bài 2: Viết chương trình Pascal nhập số n từ bàn phím. Xuất ra màn hình
+ Dòng 1: Các ước của n
+ Dòng 2: Nếu n là số lẻ thì xuất ra màn hình các số nguyên tố từ 2 đến n
+ Dòng 3: Nếu n là chẵn thì xuất ra màn hình các số hoàn hảo từ 1 đến n
+ Dòng 4: Tổng các ước của n
( 2 bài khác nhau mọi người làm riêng ra giúp mình ạaaaaaa)
: Viết chương trình Pascal sử dụng lệnh lặp While..Do tính tổng các số chẵn của số tự nhiên N (100<n<32000) với N được nhập từ bàn phím. Vẽ sơ đồ biểu diễn hoạt động của chương trình trên.
Ví dụ:
Input: Output:
123 2
6616 18
10246 12
20 tháng 1 lúc 14:52
Viết chương trình Pascal nhập số tự nhiên n từ bàn phím. Xuất ra màn hình:
Các số nguyên tố từ 2 đến n
pascal nha pls
Câu 1 : viết chương trình tính tổng các số chẵn với n được nhập từ bàn phím ?
Câu 2 : viết chương trình tính tổng các số lẻ với n được nhập từ bàn phím ?