tong=15
các bước làm:
lần lặp thứ 1: tong = 0 + 1 = 1
lần lặp thứ 2 : tong = 1 + 2 = 3
lần lặp thứ 3 : tong = 3 + 3 = 6
lần lặp thứ 4 : tong = 6 + 4 = 10
lần lặp thứ 5 : tong = 10 + 5 = 15
tong=15
các bước làm:
lần lặp thứ 1: tong = 0 + 1 = 1
lần lặp thứ 2 : tong = 1 + 2 = 3
lần lặp thứ 3 : tong = 3 + 3 = 6
lần lặp thứ 4 : tong = 6 + 4 = 10
lần lặp thứ 5 : tong = 10 + 5 = 15
1.cho đoạn chương trình sau:
tong:=2; while tong<10 do tong:=tong+1;
sau khi thực hiện xong đoạn chương trình, biến tổng có giá trị bao nhiêu
2. cho biết giá trị của X sau khi thực hiện xong đoạn ct
X:=1; Y:=2, For i:=1 to 4 do X:=X+Y;
3. giả sử A có 5 phần tử và giá trị các phần tử là 1,3,7,8,4 . khi thực hiện câu lệnh sau T:=0; For i:=1 to 5 do T:=T+A[i]; giá trị của biến T là bao nhiêu?
Vì sao chương trình sau dịch thành công nhưng khi chạy lại bị lỗi:
var i,tong byte;
begin
while i<25 do
begin
tong=tong+i
end.
1.cho đoạn ct sau:
Tong:=30; while tong>10 do tong:=tong-2;
khi kết thúc vòng lặp giá trị của biến tổng là ao nhiêu
2. khai báo biến mảng: Var A:array[1..10] of real;
sử dụng câu lệnh For i:=1 to 5 do readln(a[i]); để gán giá trị cho các phần tử trong biến mảng A từ bàn phím, ta sẽ nhập được bao nhiêu giá trị?
bài 5 dưới đây là một đoạn chương trình Pascal S:=0; For i:=0 to 5 do Begin S := S + 2; End; Khi thực hiện đoạn chương trình trên giá trị của S là bao nhiêu ?
Đối với từng đoạn chương trình Pascal sau đây, hãy cho biết sau khi thực hiện lệnh lặp giá trị của x và y là bao nhiêu? Và mỗi đoạn chương trình thực hiện bao nhiêu vòng lặp a Đoạn chương trình 1 b Đoạn chương trình 2: x: 0; y: 5 x:=1 ; y:= 5; For i:-5 to 2 do x:=x+2: For i:=3 to 7 do x:=x+2; y:=y+x; y:= y + x;
Viết lại chương trình sau cho đúng: PROGRAM Ten-KTGK-DTNT_Buon Ho VAR i: Real; S: integer; Begin S = 0; For i = 1 To 20 Do S:= S+i; Write (‘Tong S =’ , S) End
Hãy tìm hiểu đoạn chương trình sau và cho biết với đoạn lệnh đó chương trình thực hiện bao nhiêu vòng lệnh lặp sau khi kết thúc t bằng bao nhiêu T:=0 N:=S writeln t
Câu 5: (1 điểm) Hãy cho biết kết quả sau khi thực hiện đoạn chương trình dưới đây:
s:=0; i:=1;
While i<=5 do
Begin
s:= s+1;
i:=i+1;
End;
Write(S);
Kết quả S= ………
Bài tập 3: Cho đoạn chương trình Pascal
For i := 0 to 10 do
Begin
…..
End;
Sau khi thực hiện đoạn chương trình trên, giá trị của I bằng bao nhiêu?
Bài tập 4: 1 người gửi tiết kiệm tại 1 ngân hàng với số tiền ban đầu là a (triệu đồng), lãi suất sau mỗi tháng là k %. Hãy cho biết số tiền người đó rút được sau khoảng thời gian t (tháng). Biết rằng phương thức tính lãi lúy kế, nghĩa là lãi suất sau mỗi tháng sẽ được cộng vào số tiền gốc
Hãy viết thuật toán và chương trình giải bài toán trên