Дан линейный одномерный массив, заданный случайным образом, содержащий положительные , отрицательные числа и нули. Найдите сумму элементов массива, если
5-9 класс
|
среди них есть хоть один элемент больше единицы, и произведение - в противном случае.
program z1;
var a, i, z, x, y, l: integer;
mas: array [1..10] of integer;
begin
for l:=1 to 10 do
readln(mas[l]);
i:=0;
for a:=1 to 10 do
if mas[a]>1 then i:=i+1;
if i > 0 then begin
z:=0;
for x:=1 to 10 do z:=z+mas[x];
writeln(z);
end
else begin
y:=1;
for x:=1 to 10 do y:=y*mas[x];
writeln(y);
end;
end.
Нет, const n=10; array[1..n]
Другие вопросы из категории
BCD47EFCD76504FBA706 в 16
BCD47EFCD76504FBA706 во 2
BCD47EFCD76504FBA706 в 8
67065302407654230577012343 в 16
67065302407654230577012343 во 2
Помогите, пожалуйста, с заданием по информатике.
Задание находится на фото, во вложениях.
Заранее спасибо)
2. В чем состоит различие между отступом первой строки абзаца и отступом абзаца?
Читайте также
Входные данные:
в первой строке целое число n (0 < n ≤ 100) - кол-во элементов в массиве и целые числа i1 и i2 (0 < i1, i2 ≤ 100). Во второй строке целые числа Х1, Х2,..,Хn разделенные пробелом (числа по модулю не превосходят 32000) - значения элементов массива.
Выходные данные:
сумма элементов массива c номерами от i1 до i2.
(Написать программу на Паскале)
2. Создать массив A из 10 элементов, заполненный случайным образом числами принадлежащих промежутку (0;20). Вывести полученный массив на экран. Вычислить количество элементов массива, значения которых не превышают среднее арифметическое значений его элементов.
элементов массива.
3)задан массив из 9 целых чисел.Вывести на экран чётные элементы
2. Массив из 6 отрицательных и положительных целых чисел вводится в области описания констант. Найти сумму положительных элементов массива.
3. Массив из 5 целых чисел вводится с клавиатуры в строку. Найти сумму элементов массива, стоящих на чётных позициях. Вывести исходный массив и полученную сумму.
4. Массив из 40 целых чисел из промежутка [10,90] задается с помощью генератора случайных чисел. Найти сумму элементов массива, кратных n . Вывести исходный массив и полученную сумму.
Помогите кто в чем может.