помогите составить программу: Сформулировать массив из 12 произвольных чисел.Определить сумму квадратов элементов с чётными индексами. Результат вывести
10-11 класс
|
на экран.
var a:array [1..100] of integer;
i,n,s:integer;
Begin
randomize;
n:=12;
for i:= 1 to n do begin
a[i]:=random(n*10)- 10*n div 2 ;
write(a[i]:4);
if i mod 10=0 then writeln;
end;
for i:= 1 to n do begin
if i mod 2 =0 then
s:=s+a[i];
end;
writeln(s);
End.
Другие вопросы из категории
а) 44,1 кГц
б) 11 кГц
в) 22 кГц
г) 32 кГц
и разрядностью 16 бит.
изображения?22:24
Составить схему алгоритма и программу на языке программированияBasic для решения задачи по обработке одномерного массива.
минимальна. (Серия-последовательность одинаковых элементов. Длина серии-количество одинаковых элементов) .(паскаль) очень очень нужно))) заранее спасибо))
Читайте также
чисел найти количество элементов равных 3. 3)В массиве из 8 целых найти номер массива с наибольшим значением. 4)В массиве из 12 целых чисел найти количество и сумму элементов, расположенных до максимального элемента. 5)Для массива из 15 вещественных подсчитать количество элементов массива меньших суммы первого и последнего элементов массива.
массив, а на следующей строке - сумму квадратов элементов с начетными индексами.
только элементы кратные 2
3)Найти сумму первых пяти элементов
Составить программу Дан массив целых чисел , размерность -12
1) Заполнение массива производить случайными числами из диапозона [-10;35]
2)Вывести на печать только положительные элементы
3)Найти количество отрицательных элементов
Составить программу
Известны данные о выпуске прождукции ( ткани в метрах ) ткацким цехом текстильного комбината за каждый день месяца . Определить количество ткани ( метров) произведенных цехом за месяц .
вывести список книг, изданных после 2003 года.
2)составить программу , организующую массив записей о пяти студентах и их оценках по трем предметам. провести сортировку и вывести список отличников.
возрастанию двумя способами – методом «пузырька» и методом «быстрой сортировки» .