CÂU 1:
có 3 lần lặp:
+lần 1: a=2, b=2
+lần 2: a=4, b=6
+lần 3: a=6; b=12
CÂU 2:
A. sau biến gán X thiếu : và kết thúc thiếu ;
B. biến điếm i không có: kết thúc lệnh ko có;
C. sao từ khóa do ko có;
D. chỉ số đầu là 10 không được lớn hơn chỉ số cuối là 5
E. dấu ) sao chỉ số cuối phài là ] ko phải ngoặc tròn sao real không có dấu ;
F. kết thúc câu lệnh lặp không có dấu ;
CÂU 3:
var <tên biến mảng>: array[<gia trị đầu>..<giá trị cuối>] of <kiểu dữ liệu>;
VD: var chieucao:array[1..50] of real;
CÂU 4:
program ct;
uses crt;
var i,n,s:integer;
A:array[1..100] of integer;
begin
clrscr;
write('nhap n:=');readln(n);
for i:=1 to n do
begin
write('nhap mang A[',i,']:=');readln(A[i]);
end;
s:=0;
for i:=1 to n do s:=s+A[i];
writeln('tong so nguyen la:=',s);
readln
end.
chúc bạn học tốt
cho mình câu trả lời hay nhất nha
