78 40 57 34 86 77 85 60 9 32
sum perv. 5= 295 proizv perv. 5= 520004160
================
36 1 27 80 46 18 61 49 56 64
sum perv. 5= 190 proizv perv. 5= 3576960
================
89 97 41 48 71 64 23 78 79 73
sum perv. 5= 346 proizv perv. 5= 1206271824
================
20 25 57 11 18 31 60 66 82 76
sum perv. 5= 131 proizv perv. 5= 5643000
================
59 4 97 77 29 91 68 87 48 5
sum perv. 5= 266 proizv perv. 5= 51117836
================
5 37 41 27 95 57 42 64 82 24
sum perv. 5= 205 proizv perv. 5= 19455525
================
63 2 92 47 77 97 21 39 86 38
sum perv. 5= 281 proizv perv. 5= 41951448
================
19 78 93 66 9 40 39 55 92 67
sum perv. 5= 265 proizv perv. 5= 81868644
================
69 89 39 9 5 88 43 11 75 74
sum perv. 5= 211 proizv perv. 5= 10777455
================
21 91 20 11 28 49 34 34 90 98
sum perv. 5= 171 proizv perv. 5= 11771760
================
31 45 74 19 53 39 39 9 56 31
sum perv. 5= 222 proizv perv. 5= 103952610
================
25 93 98 47 28 42 98 34 39 31
sum perv. 5= 291 proizv perv. 5= 299850600
================
80 74 81 41 82 85 19 36 2 43
sum perv. 5= 358 proizv perv. 5= 1612146240
================
7 24 96 4 28 58 33 6 9 76
sum perv. 5= 159 proizv perv. 5= 1806336
================
79 9 8 86 1 99 91 97 4 4
sum perv. 5= 183 proizv perv. 5= 489168
================
4 68 86 97 91 71 12 40 26 2
sum perv. 5= 346 proizv perv. 5= 206481184
================
12 37 71 80 87 63 59 42 52 33
sum perv. 5= 287 proizv perv. 5= 219407040
================
50 20 93 20 19 23 70 49 76 44
sum perv. 5= 202 proizv perv. 5= 35340000
================
3 15 7 88 45 69 32 78 99 53
sum perv. 5= 158 proizv perv. 5= 1247400
================
57 3 57 15 96 27 81 73 54 80
sum perv. 5= 228 proizv perv. 5= 14035680
================
Другие языки программирования и технологии
Написать на языке Паскаля программу, которая находит сумму и произведение первых 5 элементов массива.
В цикле прибавляем к переменной со значением 0 первые пять элементов массива. Если хотим получить произведение - у начальной переменной делаем значение 1. Простее задачи не бывает
Александр Кузьмин
85 019
var i, n, pro, sum: integer;
a: array [1..100] of byte;
begin
n:=10;
pro:=1;
sum:=0;
for i:=1 to n do
begin
a[i]:=1+random (7);
write (a[i]:4);
if i <= 5 then
begin
pro:=pro*a[i];
sum:=sum+a[i];
end;
end;
writeln;
writeln ('Сумма первых 5-ти элементов массива = ', sum);
writeln ('Произведение первых 5-ти элементов массива = ', pro);
end.
a: array [1..100] of byte;
begin
n:=10;
pro:=1;
sum:=0;
for i:=1 to n do
begin
a[i]:=1+random (7);
write (a[i]:4);
if i <= 5 then
begin
pro:=pro*a[i];
sum:=sum+a[i];
end;
end;
writeln;
writeln ('Сумма первых 5-ти элементов массива = ', sum);
writeln ('Произведение первых 5-ти элементов массива = ', pro);
end.
Вячеслав Подружий
20 124
Похожие вопросы
- Напишите программу, которая находит в массиве количество элементов, равных заданному значению X .
- нужно создать на паскале программу которая будет находить повторяющиеся слова в массиве
- напишите программу которая находит минимальный и максимальный элементы матрицы и их индексы
- Найти номер первого нулевого элемента массива х1, х2, ..х20 и сумму элементов предшествующих ему. Please HElp!!!!
- Помогите! Информатика. Вводится пять чисел. Написать программу, которая вычисляет сумму всех четных из них.
- Напишите программу, которая находит максимальное среди чисел, записанных в файле, и выводит результат в другой файл.
- Программа, которая находит разность двух чисел (IEEE 754 стандарт double) ассемблер.
- Проверте программу, которая вычисляет сумму целых чисел от а до 500 (значение a вводится с клавиатуры). c++
- №1.Как вычислить произведение элементов массива(1..5)В Паскале=)))№2.Найти наименьший элемент в массиве!Тоже в Паскале)
- Помогите пожалуйста написать программу в Паскале )) Написать программу для вычисления суммы в массиве из 10 элементов