Сформировать массив из 10 случайных целых чисел из промежутка от - 5 до 5,вывеси элементы массива в строку черенз пробел,найти сумму всех положительных элементов.

284

362

Посмотреть ответы 2

Ответы на вопрос:

Anhelodek

Информатика

4,7(19 оценок)

Var a: array[1..10] of integer; i,s: integer; begin s: =0; for i: =1 to 10 do begin a[i]: =random(10)-5; if a[i]> 0 then s: =s+a[i]; write(a[i],' '); end; writeln; writeln('сумма пол.= ',s); end.

Daniela04102005

Информатика

4,5(24 оценок)

ответ 1. игровое окно появляющие при запуске программи рис.4

Объяснение:

Популярно: Информатика

Темы

Получить
полный доступ

150 000+ пользователей

Оформить подписку