Найти сумму отрицательных элементов одномерного массива - вопрос №144448192 от Елизавета11011 20.08.2022 03:15

Question

Информатика: Найти сумму отрицательных элементов одномерного массива из 14 элементов. элементы массива – случайные числа на отрезке [-3,5].

Елизавета11011 · Answer

Var a:array[1..14] of integer;i:integer;k,ar:real;beginrandomize;for i:=1 to 14 do begina[i]:=-3+random(9);write(a[i]:3);end;writeln;k:=0; ar:=0;for i:=1 to 14 doif a[i] 0 thenk:=k+a[i];writeln(k);end....