Muốn kiểm tra đồng thời cả ba giá trị của A, B, C có cùng lớn hơn 0 hay không ta viết câu lệnh If thế nào cho đúng ?

Hãy cho biết giá trị của M sau khi thực hiện đoạn chương trình sau với a=19 và b=12 ?

M := a ;

If a<b then M := b ;

Với M = 3 và N = 6, hãy cho biết giá trị của D sau khi thực hiện đoạn chương trình sau?

D:= 0;

for i:= M to N do

if i mod 5 = 0 then D:= D+1;

Với cấu trúc rẽ nhánh IF <điều kiện> THEN <câu lệnh 1> ELSE <câu lệnh 2> ;

Câu lệnh 1 sẽ được thực hiện khi:

Thực hiện đoạn chương trình sau, ta thu được kết quả của a là:

a := 2;

While a<5 do a := a*3;

Write(a);

Thực hiện đoạn chương trình sau, ta thu được kết quả của Q là:

Q:= 0;

For i:= 1 to 10 do

if (i mod 3 = 0) and (i mod 5 = 0) then Q:= Q+i;

Thực hiện đoạn chương trình sau, cho biết chữ “Hello Word “ được in ra màn hình mấy lần?

i := 0;

While i <=3 do

Begin

Write(‘Hello Word’);

i:=i+1;

End;

Để khai báo một mảng số thực có tên là Diem tối đa 100 phần tử, ta khai báo:

Giả sử mảng a gồm các phần tử a[1]=1, a[2]=2, a[3]=3, a[4]=4, a[5]=5.

Xét đoạn chương trình sau:

S := 0;

For i :=1 to 5 do

           If a[i] mod 2 = 1 then S := S+a[i];

Write(S);

Kết quả hiện ra màn hình là:

Đoạn chương trình sau giải bài toán nào?

T := 0;

for i:=1 to M do

if i mod 2 = 1 then T := T + 1;