Составить: программу на языке паскаль. ! 30 . 2 ! - вопрос №10538748302 от nikita6011 08.11.2021 10:22

Question

Информатика: Составить: программу на языке паскаль. ! 30 . 2 ! просто написать программу на языке паскаль 1) заполните одномерный массив из 15 элементов числами от -15 до 15 и выведите на экран сумму всех его отрицательных элементов. 2) для целочисленного массива a[1: 15] определите, является ли сумма его элементов четным числом. выведите на печать “да” или “нет”.

nikita6011 · Answer

PascalABC.NET#1begin  var A := ArrRandom(15, -15, 15).Where(x - x 0).Sum.Println;end.#2//Под A[1:15] я понял индексы элементов.begin  var A := ArrRandom(15, -100, 100);  if A.Sum mod 2 = 0 then Println( ДА )  else Println( НЕТ );end....