Используя генератор случайных чисел , заполнить массив размерностью 10 элементов...

August 2021 1 14 Report

Используя генератор случайных чисел , заполнить массив размерностью 10 элементов числами из интервала [-20, 20] и найти среднее арифметическое всех элементов массива .

Answers & Comments

KotShredingera Var mass:array[1..10] of integer;
var i:integer;
var sum: integer;
var ans: real;
begin
Randomize;
sum:=0;
for i:=1 to 10 do begin
mass[i]:=Random (41) - 20; write(mass[i],' ');
end;
for i:=1 to 10 do
sum+=mass[i];ans:=sum/10;
writeln('Otvet: ', ans);
end.

2 votes Thanks 5

Answers & Comments

dan massiv e14 sformirovatmassiv f sostoyashij iz nomerov polozhitelnyh el

s klaviatury vvoditsya posledovatelnost simvolov do teh por poka ne budet vvede

dano celoe chislo n najti samuyu maksimalnuyu cifru etogo chisla

s klaviatury vvoditsya massiv iz m chiselnajti summu elementov massiva

dan massiv celyh chisel soderzhashij 15 elementovvyvesti na ekran indeksy chetnyh

napisat sochinenie esliby ya byl gubernatorom

рекомендуемые вопросы

Helpful Links

Helpful Social