Bài 1 Cho thuật toán sau: Bước 1: S 0; i 1; Bước 2: Nếu i<=10 thì thực hiện S S + i; rồi chuyển sang bước 3 ngược lại chuyển sang bước 4. Bước 3: i i + 1; rồi quay lại bước 2. Bước 4: Thông báo giá trị của S rồi kết thúc. a) Em hãy 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? b) Khi kết thúc, giá trị của S là bao nhiêu? c) Viết chương trình Pascal thể hiên thuật toán đó.
2 câu trả lời
a. Máy tính thực hiện 10 vòng lặp
b. S=55
c.
Program BTH;
uses crt;
var s,i: integer;
Begin
clrscr;
for i:=1 to 10 do s:=s+i;
writeln('S= ',s);
readln;
end.
a)máy tính thực hiện 10 vòng lặp
b)S=55
c)
program oken;
uses crt;
var s,i: integer;
begin
clrscr;
for i:=1 to 10 do
s:=s+i;
writeln('S: ',s);
readln;
end.