77

Помогите пажалуйста. Очень надо решить!

whitele 05 апреля 2023

Помогите пажалуйста. Очень надо решить! Составьте программу, которая формирует массив из 40 случайных целых чисел от 0 до 20 и вычисляетсреднее арифметическое нечетных чисел.

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

56

vara: array [1… 40] of integer; k,i,s: integer; sr: real; beginrandomize; for i: =1 to 40 do begina[i]: =random (21); write (a[i],'); end; writeln; for i: =1 to 40 doif odd (i)=true then begink: =k+1; s: =s+a[i]; end; sr: =s/k; writeln (sr: 3:4); readln; end.

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

Знаете другой ответ?
Другие вопросы по информатике

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