Составить алгоритмы и программы дляСоставить алгоритмы и программы для заполнения : Массива А (30) по формуле A(i) = 10*I + 2*i2
<span />Составить алгоритмы и программы для<span>Составить алгоритмы и программы для заполнения : Массива А (30) по формуле A(i) = 10*I + 2*i2. Найти среднее арифметическое элементов < 50. Распечатать массив в строку. СОСТАВЬТЕ ПРОГРАММУ ПЛИЗ</span>
Если я правильно понял условие, то код выглядит так. uses crt; var i,ans,sum:integer; a:array[1..30] of integer; begin sum:=0; ans:=0; for i:=1 to 30 do begin a[i]:=10*i+2*sqr(i); if a[i]<50 then ans:=ans+1; sum:=sum+a[i]; end; writeln(sum/ans); for i:=1 to 30 do <span>write(a[i],' '); </span>end.
Том - это не диск, а его раздел, причем отформатированный. Вообще пошло от слова Volume который можно перевести как объем(который можно заполнить данными) или том.