Mảng A gồm bao nhiêu phần tử : For i:=1 to 6 Begin write('a[',i,']=');readln(a[i]);end;
K
Khách
Hãy nhập câu hỏi của bạn vào đây, nếu là tài khoản VIP, bạn sẽ được ưu tiên trả lời.
Những câu hỏi liên quan
13 tháng 10 2019
A mới đúng nhé bạn
in ra thì phải write(a[i]:5) mới đúng
D là nhập rồi nhé bạn
27 tháng 6 2019
1
a/ For i:=1,5 to 10.5 do s:=s+i;
=> For i:=1 to 10 do s:=s+i;
b/ Var X : array [100..1] of integer;
=>Var X : array [100..1] of integer;
c/ X:=1 ; while X:=10 do X:=X+5;
=>X:=1 ; while X=10 do X:=X+5;
d/For i:=1 to n do begin s:=s+i ; i:=i-1;
=>For i:=1 to n do begin s:=s+i ; i:=i-1;end;
2
a) X:ARRAY[1..50]OF INTEGER;
B) A[9]:=5;
C)DIEMTIN:ARRAY[1..100] OF REAL;
D) WRITE('DIEM TIN[5]:');READLN(DIEMTIN[5]);
1
i