77

Составьте программу, которая формирует массив из 40 случайных целых…

magugasan 25 июля 2022

Составьте программу, которая формирует массив из 40 случайных целых чисел от 0 до 20 и вычисляет сумму чисел, не превышающих 10

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

33

program pr; var mas: array[1… 40] of integer; i, sum: integer; beginrandomize; for i: =1 to 40 do mas[i]: =random (20); for i: =1 to 40 do if mas[i] <= 10 then sum: =sum+mas[i]; writeln ('сумма равна ', sum); readln; end. Программу проверил все работает

пользователи выбрали этот ответ лучшим
Знаете другой ответ?

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