Ôn tập cuối năm
Các câu hỏi tương tự
Câu 1 : HÃy tìm lỗi sai trong các câu lệnh dưới đây và sửa lỗi sai cho đúng :
a, For i:=5 to 15 do ; S:=S+1;
b, i:=30; while i>20 then i:=i-2;
c, B:=0; While B<=100 do B=B+2;
d, For i:=1 to 10 do ; a:=a+1;
e, S:=5.5; while s<20.5 do S=S*2;
f, S:=0; i:=1 While i<=100 do begin If i mod 2 =0 then S:=S+1; i:=i+1;end;
làm gấp cho em vs ạ
cho thuật toán sau
bước 1: i:=0, T:=105
bước 2: nếu T<20 thì chuyển sang bước 4
bước 3: i:=i+5, T:=T- i, quay lại bước 2
bước 4: in ra kết quả T và i
a) hãy cho biết, khi thực hiện thuật toán trên, máy tính sẽ thực hiện bao nhiêu vòng lặp và giá trị T và i là bao nhiêu
b) viết chương trình thể hiện thuật toán trên
Câu 33: Cho T:= 20; For i:= 2 to 6 do T:=T - 2; Sau vòng lặp giá trị T=? A. 10 B. 12 C. 8 D. 6
cho :
s:=0; i:=2;
while i <= 9 do
begin
if i mod 2 = 0 then s:= s+1; i:= i+1;
end;
tính;
- số vòng lặp :
- s = ?
- i =?
làm tổng quát cho mình để mình dựa vạo mình làm mấy bài sau
câu31Khi thực hiện đoạn chương trình sau: n:=10; T:=10;
While n <16 do Begin N:=n+t; t:=t-5; End; Giá trị N=? A. 20 B. 15 C.10 D. 5
8 tháng 5 2023 lúc 19:42
A[i] :21; A[2]: 5; A[3]:18; A[4]:19; S:0;For i:1 to 4 do If A[i] mod 3 0 thenS:S+A[i];Write(s); Cho biết kết quả in ra là bao nhiêu sau khi thực hiện đoạn chương trình bên?A.0 B.27 C.39 D.63Giúp mình với. Mình cần gấp. Cảm ơn
Đọc tiếp
A[i] :=21; A[2]:= 5; A[3]:=18; A[4]:=19;
S:=0;
For i:=1 to 4 do
If A[i] mod 3 = 0 then
S:=S+A[i];
Write(s);
Cho biết kết quả in ra là bao nhiêu sau khi thực hiện đoạn chương trình bên?
A.0 B.27 C.39 D.63
Giúp mình với. Mình cần gấp. Cảm ơn
Câu 1: Cho s và i là biến nguyên,Khi chạy đoạn chương trình sau:
S:=0 ; i:+0
While i<3 do begin i:=i+1;
s:=s+i*i;end;
writeln(s);
Kết quả in lên màn hình s là bao nhiêu ?
Câu 2: số thực a,b nhập từ bàn phím . tính giá trị biểu thứ
S= a^2 +b^2 In ra S
giúp mình với mai mình ktra rùi :((
viết cú pháp câu lệnh lặp với số lần biết trc cho ví dụ c10 kiểm tra tính đúng sai của câu lệnh sauneeus sai sửu lại cho đúng
a for i = 1 to 5 do writeln (`A');
b, for i : 1.5 to 5.5 do writeln (`A');
c x : 5 ; while x : x=5 DO X: = x + 5 ;
d, var array : x [1.. 10] of interger ;
Giả sử biến mảng A có 5 phần tử và giá trị của các phần tử lần lượt là 3,7,6,1,9. Khi thực hiện câu lệnh sau: tb := 0; For i := 1 to 5 do tb := tb + A[i]; Giá trị của biến tb là bao nhiêu? A. 25 B.26 C.27 D.28