Question

Câu 1 khai báo dãy a gồm n(n>=300) số nguyên dương Câu 2 khai báo dãy a gồm n(n>=300) số nguyên dương mỗi số có giá trị nhỏ hơn 500 a tạo giá trị mảng bằng hàm random B tính tổng các số có giá trị bằng 150

Answer 1

ko bt 

 

Answer 2

Câu 2:

uses crt;

var a:array[1..300]of integer;

i,n,t:integer;

begin

clrscr;

randomize;

cin>>n;

for i:=1 to n do a[i]:=random(500);

t:=0;

for i:=1 to n do if a[i]=150 then t:=t+a[i];

writeln(t);

readln;

end.