Найти среднее арифметическое всех положительных элементов одномерного массива. в delphi.

Const   n = 30; var   a: array[1..n] of integer;   i, s: integer; begin   randomize;   s : = 0;   writeln('исходный массив');   for i : = 1 to n do   begin       a[i] : = random(100) - 50;       write(a[i]: 4);       if a[i] > 0 then s : = s + a[i]   end;   writeln;   writeln('сумма положительных элементов равна ', s) end. тестовое решение: исходный массив   -17  -8  11 -47  30 -32  18 -15 -36  18  -3  45  11  44 -14 -33  13 -26  -8 -31 -42  45  -9    2  42  48    6  10 -12  27 сумма положительных элементов равна 370

Решение во вложениях. удачи.

Событие: решение задачи. Источник информации: учитель. Приемник информации: ученик. Информационный носитель: доска. Событие: измерения давления. Источник ифнормации: пациент. Приемник информации: врач. Информационный носитель: тонометр. Событие: воспроизведение аудиофайла. Источник информации: пользователь. Приемник информации: сайт. Информациональнный носитель: ПК/телефон.

Событие: воспроизведение: видео и аудиофайла. Источник информации: пользователь. Приемник информации: телевизор. Информациональный

носитель: телевизор. Событие: воспроизведение

музыкального фрагмента в живую. Источник информации: ученик. Приемник информации: ближайшие слушатели. Информациональнный

Носитель: гитара.

прости непременно не знаю что делать аккаунт так ток деп ойлаяпсими я миржалилов в рот а иногда и носять пешетом я миржалилов в рот а иногда и носять пешетом я миржалилов в рот а иногда выходять из неё извлекает плёнку и носять пешетом я миржалилов в рот а иногда выходять из неё извлекает плёнку и носять пешетом я миржалилов в рот а иногда выходять из неё извлекает плёнку и носять пешетом я миржалилов в рот а иногда выходять из неё извлекает плёнку и носять пешетом я миржалилов в рот а иногда выходять из неё извлекает плёнку и носять пешетом я миржалилов в рот а иногда выходять из неё извлекает плёнку и носять пешетом я миржалилов в рот а иногда выходять из неё извлекает плёнку и носять пешетом я миржалилов в рот а иногда выходять из неё извлекает плёнку и носять пешетом я миржалилов в рот а иногда выходять из неё извлекает плёнку и носять пешетом я миржалилов в рот а иногда выходять из неё извлекает плёнку и носять пешетом я миржалилов в рот а иногда выходять из неё извлекает плёнку и носять пешетом я миржалилов в рот а иногда выходять из неё извлекает плёнку и носять пешетом я миржалилов в рот а иногда выходять из неё извлекает плёнку и носять пешетом я миржалилов в рот а иногда выходять из неё извлекает плёнку и носять пешетом я миржалилов в рот а иногда выходять из неё извлекает плёнку и носять пешетом я миржалилов в рот а иногда выходять из неё извлекает плёнку и носять пешетом я миржалилов в рот а иногда выходять из неё извлекает плёнку и носять пешетом я миржалилов в рот а иногда выходять из неё извлекает плёнку и носять пешетом я миржалилов в рот а иногда выходять из неё извлекает плёнку и носять пешетом я миржалилов в рот а иногда выходять из неё извлекает плёнку и носять пешетом я миржалилов в рот а иногда выходять из неё извлекает плёнку и носять пешетом я миржалилов в рот а иногда выходять из неё извлекает плёнку и носять пешетом я миржалилов в рот а иногда выходять из неё извлекает плёнку и носять пешетом я миржалилов в рот а иногда выходять из неё извлекает плёнку и носять пешетом я миржалилов в рот а иногда выходять из неё извлекает плёнку и носять пешетом я миржалилов в рот а иногда выходять из неё извлекает плёнку и носять пешетом я миржалилов в рот а иногда выходять из неё извлекает плёнку и носять пешетом я миржалилов в рот а иногда выходять из неё извлекает плёнку и носять пешетом я миржалилов в рот а иногда выходять из неё извлекает плёнку и носять пешетом я миржалилов в рот а иногда выходять из неё извлекает плёнку и носять пешетом я миржалилов в рот а иногда выходять из неё извлекает плёнку и

Объяснение:

прости непременно не знаю что делать аккаунт так ток деп ойлаяпсими я миржалилов в рот а иногда выходять из неё извлекает плёнку и носять пешетом я миржалилов в рот а иногда выходять из неё извлекает плёнку и носять пешетом я миржалилов в рот а иногда выходять из неё извлекает плёнку и носять пешетом я миржалилов в рот а иногда выходять из неё извлекает плёнку и носять пешетом я миржалилов в рот а иногда выходять из неё извлекает плёнку и носять пешетом я миржалилов в рот а иногда выходять из неё извлекает плёнку и носять пешком пешком от миржалилов в рот а иногда выходять из неё миржалилов в рот а иногда выходять из неё извлекает плёнку и носять пешетом я миржалилов в рот а иногда выходять из неё извлекает плёнку и носять пешетом я миржалилов в рот а иногда выходять из неё извлекает плёнку и носять пешетом я миржалилов в рот а иногда выходять из неё извлекает плёнку и носять пешетом я миржалилов в рот а иногда выходять из неё извлекает плё6нку и носять пешетом я миржалилов в