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.

2 tháng 2 2018

Đáp án A

21 tháng 5 2019

Đáp án A

17 tháng 4 2018

Đáp án A

2 tháng 10 2017

Đáp án A

22 tháng 4 2022

Câu lệnh thực hiện tính tổng các phần từ từ 1->5.

=> tb= 3+7+6+1+9= 26

-> CHỌN B

6 tháng 5 2019

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

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);

 

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.