Подскажите, составить программу вычесления: суммы всех положительных…

Подскажите, составить программу вычесления: суммы всех положительных элементовмассива. Буду благодарна.

в избранное

znlena

17 августа 2022

vara: array[1… 1000]of integer; i,sum: integer; beginreadln (n); sum: =0; for i: =1 to n do beginread (a[i]); inc (sum,a[i]); end; writeln (sum); end.

пользователи выбрали этот ответ лучшим

комментировать

в избранное ссылка отблагодарить

Знаете другой ответ?

Задайте свой вопрос

Почистить ковер обратный алгоритма

3. Чем отличается информация от сообщения? Приведите примеры. 4. Что такое кодирование, декодирование?

На паскале заполнить массив из 10 элементов случайными числами от [0,5) и найти количествоединиц

Определить информационный объем изображения (в килобайтах) изображения 128 х 128 пикселей с 4 цветами

Сколько мегабайт в 20 байтах сколько мегабайт в 1024 гигабайтов?

А) Информация — этоб) Действие с информацией — это действия, связанные с

Рисунки, картины, фото, схемы-это … Информация

Встретились три одноклассника-белов, рыжов, чернов

27400

Алгебра

14822

Английский язык

14216

Биология

7369

Другой

720

18829

8304

15850

5255

11818

23332

15992

73118

8152

466

46271

Email:
Пароль:
	забыли пароль?

Логин:
Email:
Пароль: