95

Создать массив случайных чисел A[1… 30] Найти сумму элементов этого массива,…

01 марта 2023

Создать массив случайных чисел A[1… 30] Найти сумму элементов этого массива, которые больше 9. Написать напаскале

категория: информатика



68

var a: array[1… 30]of integer; i,s: integer; beginfor i: =1 to 30 do begina[i]: =random (20)+1; {промежуток от 1 до 20}if a[i]>9 then s: =s+a[i]; write (a[i],'); end; writeln; writeln (s); end.

Знаете ответ?


Есть интересный вопрос? Задайте его нашему сообществу, у нас наверняка найдется ответ!
Делитесь опытом и знаниями, зарабатывайте награды и репутацию, заводите новых интересных друзей!
Задавайте интересные вопросы, давайте качественные ответы и зарабатывайте деньги. Подробнее...