Bạn chưa đăng nhập. Vui lòng đăng nhập để hỏi bài

Những câu hỏi liên quan
Nguyễn Cảnh Hùng
Xem chi tiết
Đỗ Ngọc Trinh
21 tháng 5 2019 lúc 6:59

Đáp án A

Nguyễn Cảnh Hùng
Xem chi tiết
Đỗ Ngọc Trinh
2 tháng 2 2018 lúc 5:06

Đáp án A

Nguyễn Cảnh Hùng
Xem chi tiết
Đỗ Ngọc Trinh
17 tháng 4 2018 lúc 10:46

Đáp án A

Nguyễn Cảnh Hùng
Xem chi tiết
Đỗ Ngọc Trinh
2 tháng 10 2017 lúc 5:06

Đáp án A

Phan Đào Gia Hân
Xem chi tiết
Philip Ha Sha
Xem chi tiết
Minh Lệ
6 tháng 5 2019 lúc 14:55

Lời giải:

Đoạn lệnh :

tb:=0;

for i:=1 to 5 do tb:=tb+a[i];

=> tb=1(gt đề cho)+4(gt đề cho)+7(gt đề cho)+2(gt đề cho)+6(gt đề cho)=20

Vậy đoạn lệnh kết thúc với tb=20

Lê Thị Khánh Thi
Xem chi tiết
Vũ Hạ Linh
Xem chi tiết
Nguyễn Lê Phước Thịnh
7 tháng 5 2021 lúc 21:10

Câu 1: 

a) var a:array[1..50]of real;

b) a[5]:=8;

c) for i:=1 to 50 do  

begin

write('A[',i,']='); readln(a[i]);

end;

for i:=1 to 50 do 

 write(a[i]:4);

 

Nguyễn Lê Phước Thịnh
7 tháng 5 2021 lúc 21:10

Câu 2: 

uses crt;

var s,i:integer;

begin

clrscr;

s:=0;

for i:=1 to 10 do 

  s:=s+i;

writeln(s);

readln;

end.

Nguyễn Lê Phước Thịnh
7 tháng 5 2021 lúc 21:11

Câu 3: 

b) a[2]=37

a[9]=25

Quảng Nguyễn
Xem chi tiết