Задать вопрос
25 сентября, 12:25

Дан одномерный массив из 5 элементов. Найти сумму всех положительных элементов массива.

Начало такое

var a: array[1 ... 5] of integer;

+4
Ответы (1)
  1. 25 сентября, 12:48
    0
    Summa:=0;

    for i:=1 to n do

    if a[i]mod 2 0 then summa:=summa+a[i];

    end.
Знаете ответ?
Сомневаетесь в ответе?
Найдите правильный ответ на вопрос ✅ «Дан одномерный массив из 5 элементов. Найти сумму всех положительных элементов массива. Начало такое var a: array[1 ... 5] of integer; ...» по предмету 📘 Информатика, а если вы сомневаетесь в правильности ответов или ответ отсутствует, то попробуйте воспользоваться умным поиском на сайте и найти ответы на похожие вопросы.
Смотреть другие ответы
Похожие вопросы по информатике
Укажите верное описание целочисленного массива mass, состоящего из 10 элементов. Интервал значений элементов [0; 100] 1) var mass:array of integer; 2) var mass:array[1 ... 10] of integer; 3) var mass:array[0 ... 100] of integer; 4) var mass:array[0 .
Ответы (1)
1. Какие из приведенных описаний являются неправильными и почему? • var a: array [1 ... 20] of integer; • type myarray=array [1 ... 20]; var b: myarray; • var sd: array [1 ... n] of integer; • var dd: array[1] of integer;
Ответы (1)
Какие описания массивов являются правильными с точки зрения компилятора языка Pascal? var a1: array[-1000 ... 50] of integer; const m1 = 20; m2 = m1*100; var a6: array[m1 ... m2] of - 200 ... 200; var a2: array[200 ...
Ответы (2)
Задача 1. Даны следующие описания массивов: var a, b : array [1 ... 10] of integer; var c : array [0 ... 9] of integer; var d : array [0 ... 10] of char; var e : array [1 ...
Ответы (1)
Хотя бы 3-4 задачи! 1) Дан одномерный целочисленный массив размерностью N. Найдите количество элементов, которые кратны 3 (5). 2) Дан одномерный целочисленный массив А, состоящий из N элементов. Найти сумму всех четных элементов массива.
Ответы (1)
*{*}