Bài 1:Viết chương trình tính tổng các số lẻ( số chẵn) của 100 số tự nhiên đầu tiên bằng câu lệnh While..do; For ....do.

Bài 2:B1:S←0;n←1

B2:nếu S >200 thì chuyển B4

B3:S←S+n*n; n←n+1

B4: Thông báo kết quả S và kết thúc.

Bài 3:Tính tổng của 5+10+15+20+25+30+35+....+100 bằng câu lệnh lặp For ... do ; While .... do

Bài 4:Viết chương trình in ra màn hình bản cửu chương của số N trong khoảng từ 1 đến 9 , số được nhập từ bàn phím và dừng lại để có thể quan sát kết quả.

Bài 5:Cũng như câu lệnh if, có thể dùng câu lệnh for lồng bên trong một câu lệnh for ... do lồng nhau để in ra màn hình các số từ 0 đến 99.

Bài 6: B1:S←10; n←0.

B2: Nếu S≥10, chuyển tới bước 4

B3: n←n+3,S←S-n và quay lại bước 2.

B4: Thông báo S và kết thúc thuật toán.

Bài 7: Viết chương trình sử dụng câu lệnh lặp While ... do để tính trung bình của n số thực X₁ , X₂ , X₃ , ..... X_n . Các số n và X₁, X₂, X₃, ... X_n được nhập vào từ bàn phím.

Bài 8 : Viết chương trình nhập điểm của các bạn trong lớp . Sau đó in ra màn hình số bạn đạt kết quả học tập loại Giỏi ,Khá ,trung bình và kém (theo tiêu chuẩn >8 điểm :Giỏi , từ 6,5 đến 7,9 điểm : Khá , từ 5 điểm đến 6,5 điểm : Trung bình và dưới 5 điểm :Kém ).

Câu 1: Viết biểu thức sau bằng kí hiệu pascal

a, (a+b)² (d+e) b, ax²+bx²+cx

Câu 2: Nêu qui tắc đặt trong ngôn ngữ lập trình Pascal

Câu 3: Viết chương trình tính diện tích hình chữ nhật S với a , chiều rộng b nhập từ bàn phím

MONG MẤY MẤY BẠN GIẢI GIÚP
MÌNH CẦN GẤP

MÌNH ĐANG CẦN GẤP MỌI NGƯỜI GIÚP MÌNH NHANH NHÉ :)))))

Khởi động chương trình pascal, viết chương trình nhập số ttuwj nhiên n sao cho 5<n<100, nếu nhập sai yêu cầu nhập lại đúng thì tính tổng S_n:

S_n=\(\frac{1.2}{3.4}\)+\(\frac{2.3}{4.5}\)+\(\frac{3.4}{5.6}\)+....+\(\frac{n.\left(n+1\right)}{\left(n+2\right)\left(n+3\right)}\)

- Mình mới dùng nên phân số còn hơi chệch choạc, mong mn thông cảm nhé.

1. Nhập vào một số n (5<=n<=10) và n phần tử của dãy A_i với 1<A_i<100 (có kiểm tra dữ liệu khi nhập vào. Viết chương trình, thuật toán

a. In ra các phần tử là số nguyên tố của dãy

b. Tính ƯCLN của tất cả các phần tử của dãy

c. Tính biểu thức sau: S=a_i¹+a_i²+a_i³+...+a_nⁿ

d. Sắp xếp và in ra dãy sau sắp xếp

2. Viết chương trình, thuật toán tối giản phân số bằng cách chia cả tử và mẫu cho ƯCLN

3. Viết chương trình con tính x^y với x,y là 2 stn được nhập từ bàn phím

4. Viết chương trình con tính giai thừa của n với n stn được nhập từ bàn phím

5. Viết chương trình, thuật toán tìm số hoàn chỉnh, số chính phương, số nguyên tố và BCNN

6. Nhập giá trị của mảng chia hết cho 3 và 5. Sắp xếp các phần tử chia hết cho 3 và 5 theo chiều tăng dần

7. Nhập dữ liệu cho các phần tử của mảng và đưa ra màn hình mảng vừa nhận. Tính tổng của các giá trị của các phần tử tính từ các phần tử lẻ đến số lượng các phần tử lẻ

8. Viết chương trình dùng câu lệnh repeat until Tính tổng của \(A=\dfrac{1}{1\cdot3}+\dfrac{1}{2\cdot4}+...+\dfrac{1}{n\left(n+2\right)}\)

9. Viết chương trình tính hàm \(e^x=1+x+\dfrac{x^2}{2!}+....+\dfrac{x^n}{n!}\)

10. Viết chương trình tính aⁿ với a,n được nhập từ bàn phím

Các Bn viết đầy đủ thuật toán, chương trình giúp Mk nhé

Câu 36. Cho đoạn chương trình:

i:=1; j:=2; k:=3;

While i<6 do i:=i+1; j:=j+1; k:=k+j;

Writeln (i, j, k);

Sau khi thực hiện đoạn chương trình trên i, j, k có kết quả là

A. 6;3;6

B. 6;6;12

C. 6;7;12

D. 6;7;28