13.1. дан массив целых чисел из 12 элементов. - вопрос №552716313112 от kostas2018 21.05.2023 11:57

Question

Информатика: 13.1. дан массив целых чисел из 12 элементов. найти сумму отрицательных элементов массива. 13.2. дан массив целых чисел из 12 элементов. найти количество элементов массива являющихся нечетными и положительными. 13.3. дан массив целых чисел из 12 элементов. выяснить верно ли, что количество положительных элементов не превышает 5. турбо паскаль. : )

kostas2018 · Answer

13. 1vara: array [1.. 100] of integer; k,i: integer; beginfor i:= 1 to 12 doreadln(a[i]); k:=0; for i:= 1 to 12 do if a[i] 0 then k:=k+a[i]; writeln(k); end....