Em hãy cho biết thực hiện thuật toán sau, máy tính sẽ thực hiện bao nhiêu bằng lặp khi kết thúc giá trị S bằng bao nhiêu?
Thuật toán:
B1S:=18,n:=2.
B2 Nếu S<=8,chuyển tới b4
B3 S:=S-n và quay đại b2
B4 Thopng báo S và kthuc thuật toán
Viết chương trình Pascal thể hiện thuật toán trên
Thuật toán:
B1S:=18,n:=2.
B2 Nếu S<=8,chuyển tới b4
B3 S:=S-n và quay đại b2
B4 Thopng báo S và kthuc thuật toán
Viết chương trình Pascal thể hiện thuật toán trên
Quảng cáo
1 câu trả lời 244
1 năm trước
Program tin;
Uses crt;
Var S, n:real;
Begin
Write ('Nhap n');
Readln (n);
S:=18;
n:=2
If (S>8) then n:=n+1 and S:=S-n else write ('Ket qua S',S);
Readln;
End.
Quảng cáo
Câu hỏi hot cùng chủ đề
-
Hỏi từ APP VIETJACK1 42624
-
Hỏi từ APP VIETJACK20770
-
Hỏi từ APP VIETJACK20738
Gửi báo cáo thành công!