Question

[Vy Nguyễn Khánh]

Cách khai báo sau đây là đúng hay sai? Nếu sai hãy sửa lại:

Var x:array [10,13] of integer;

S:=0; n:=0; while S < for do n:=n + 1; S:= s+n

For i:=1 to 10 do; writeln ('A')

Var x: real; begin for x:=1 to 10 do writeln ('A'); end.

Answer 1

[Phan Tiến Đạt]

A/ Sai.

Sửa: Var x:array[10..13] of integer;

B/ Sai.

Sửa: S:= 0; n:= 0; while S < 50 do

begin n:= n + 1; S:= S + n; end;

C/ Sai.

Sửa: for i:= 1 to 10 do writeln('A');

D/ Sai.

Sửa x: integer; begin for x:= 1 to 10 do writeln('A'); end.