1. Chuyên đổi các biểu thức toán học sang biểu thức Free pascal
A. ![]()
B. ![]()
C. ![]()
D. ![]()
E. ![]()
2.1 cuốn vở giá 8000đ /1 quyển và bút bi với giá 3000đ/1 chiếc. Em hãy viết chương trình tính tổng số tiền em phải mua với m quyển vở và n ngòi bút. Với n,m được nhập từ bàn phím.
3.Cho 2 số nguyên a,b. thương của 2 số nguyên là c: hãy viết chương trình tính thương của 2 số đó
4. Cho một số nguyên a. Hãy viết chương trình kiểm tra xem a là số chẵn hay lẻ.
5. Cho ba số a,b,c là số nguyên. Được nhập từ bàn phím. Hãy viết chương trình tìm số lớn nhất trong 3 số đó
Câu 1:Sử dụng ngôn ngữ lập trình Pascal để viết chương trình theo thuật toán dưới đây:
B1:T←8;n←1;
B2:Nếu T>=99 thì chuyển tới B4
B3:n←n+3;T←T*n và quay lại B2
B4:In giá trị của T,n và kết thúc
Câu 2:Sử dụng ngôn ngữ lập trình Pascal để viết chương trình nhập vào từ bàn phím(ĐTB)của n học sinh trong một lớp (1<=n<=70).In ra màn hình số lượng và tỉ lệ học sinh đạt điểm trung bình trở lên(ĐTB>=5.0)
Bài toán tính tổng : S=1+1/2+1/3+...+1/100
a.Nêu thuật toán và viết chương trình sử dụng câu lệnh For...to...do
b.Nêu thuật toán và viết chương trình sử dụng câu lệnh While...do
A. Em hãy cho biết thuật toán máy tính sẽ thực hiện bao nhiêu vòng lặp? Kết thúc giá trị của S bằng bao nhiêu? B. Viết chương trình bằng pascal để mô tả thuật toán đó. B1: S ! 20, n! 1; B2: nếu S>5 hoặc = 5, chuyển b4 B3: n ! N + 1, S ! S - n và quay lại b2 B4: thông báo S và kết thúc thuật toán.
Em hãy cho biết thuật toán máy tính sẽ thực hiện bao nhiêu vòng lặp? Kết thúc giá trị của S bằng bao nhiêu? Viết chương trình bằng Pascal để mô tả thuật toán đó.
B1: S ! 20, n! 1;
B2: Nếu S ≥ 5, chuyển B4.
B3: n ! N + 1, S ! S - n và quay lại B2.
B4: Thông báo S và kết thúc thuật toán.
Giúp mình với ;-;
Hãy tìm hiểu các thuật toán sau đây và cho biết khi thực hiện thuật toán, máy tính sẽ thực hiện bao nhiêu vòng lặp? Khi kết thúc, giá trị của S bằng bao nhiêu? Viết chương trình Pascal thể hiện các thuật toán đó
b) Thuật toán 2
Bước 1. S ←10, n ← 0.
Bước 2. Nếu S ≥ 10, chuyển tới bước 4.
Bước 3. n ← n+3, S ← S-n và quay lại bước 2.
Bước 4. Thông báo S và kết thúc thuật toán.
VIẾT THUẬT TOÁN VÀ CHƯƠNG TRÌNH PASCAL Các bài toán sau Tính giá trị biểu thức a= x2+x+1( với x nhập từ bàn phím ) mong giúp gắp ạ
Hãy tìm hiểu các thuật toán sau đây và cho biết khi thực hiện thuật toán, máy tính sẽ thực hiện bao nhiêu vòng lặp? Khi kết thúc, giá trị của S bằng bao nhiêu? Viết chương trình Pascal thể hiện các thuật toán đó.
Bước 2. Nếu S > 10, chuyển tới bước 4.
Bước 3. n ← n+2, S ← S+n và quay lại bước 2.
Bước 4. Thông báo S và kết thúc thuật toán.
Cần rất gấp!!!!!!
Cho chương trình Tính Tổng Các Số Tự Nhiên Từ S=1+2+3+ ...... (Khi Tổng S đầu tiên > 1000 thì dừng). Hỏi cộng bao nhiêu số?
Hãy Tìm lỗi trong chương trình và sửa lỗi viết lại chương trình cho đúng:
Program tinh_tong;
Var n S: Integer
Begin
n: 0;
S = 0;
While S< 1000 do
n:= n + 1;
S:= S + n
Writeln(‘Can cong’,n-1,’so va tong dau tien > 1000 la’, S);
Readln;
End.