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 ạ
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 :((
Giúp mình giả câu này với Sao khi thực hiện đoạn chương trình sao: j:=0; s:=1; for i:=1 to 3 do j:= j+1; s:= j+1; Giá trị của biến j, biến s bằng? A. J=4;s=3 B. J=3;s=4 C. J=1;s=2 D. J=2;s=3
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
Sau khi thực hiện đoạn chương trình sau S:=2; For i:=1 to 5 do S:=S+i; Giá trị của biến S bằng bao nhiêu
sử dụng lệnh lặp while ...do để viết chương trình tính tổng
S=1/1+1/2+1/3+1/4+...+1/2n
Cho thuật toán như sau:
Kí hiệu S là tổng cần tìm
Bước 1: S ¬ 0, n ¬ 0.
Bước 2: Nếu S≤1000, thì: n ¬ n+1; S ¬ S + n và quay lại bước 2.
Ngược lại, chuyển tới bước
Bước 3: In kết quả: n là số tự nhiên để tổng S nhỏ nhất sao cho S>1000. Kết thúc thuật toán.
? Em hãy dùng câu lệnh lặp While … do để viết chương trình thể hiện thuật toán trên
Mình đang cần gấp