1). Дан массив из n элементов (n >= 4). Подсчитать среднюю арифметическую второго и предпоследнего элемента массива.
5-9 класс
|
2). Дан массив из n элементов. Написать программу подсчитывающую произведение элементов массива.
var a:array[1..50000] of integer;
n,i,p:integer;
sr:real;
begin
readln(n);
p:=1;
for i:=1 to n do begin
read(a[i]);
p*=a[i];
end;
sr:=(a[2]+a[n-1])/2;
writeln('Среднее ар. - ',sr:2:1,' произведение - ',p);
end.
Другие вопросы из категории
Сравните содержание указания "Открыть с помощью " в контекстных меню нескольких файлов: текстового с расширением txt, текстового с расширением doc, двоих графических с расширениями bmp и gif , музыкального с любым расширением. Чем отличаются подменю этих указаний?
Даны три точки А, В, С на числовой оси. Найти длины отрезков АС и ВС и их сумму.(нужно чтобы прошел тест на taskbook)
179 перевести в 8ричную в 16ричную и в 2ичную
202 перевести в 8ричную в 16ричную и в 2ичную
225 перевести в 8ричную в 16ричную и в 2ичную
Читайте также
Помогите пожалуйста
таких членов.
2.Дан массив из 10 элементов. Найти количество элементов с четными индексами.
3.Дан массив из 10 элементов. Найти наибольший элемент массива.
среднее арифметическое всех элементов массива; d) Найти произведение всех элементов массива.
распредилить, какие числа меньше нуля, но как вычислить среднее арифметическое, не зная точное кол-во отрицательных элементов? Желательно написать полной программой. Заранее спасибо с: