IvanVRN136
Опубликовано 6 лет назад по предмету Информатика от IvanVRN136


В массиве,состоящем из 10 случайных чисел в интервале[-20;10],определите количество и сумму элементов кратных 3.Pascal ABC.9класс

  1. Ответ
    Ответ дан estengseant
    var a: array[0..10] of Integer;i,sum,count: Integer;beginsum:=0;count:=0;for i:=0 to 9 dobegina[i]:=random(31)-10;writeln('Число ',i+1,': ',a[i]);end;for i:=0 to 9 dobeginif a[i] mod 3=0 then begincount:=count+1; sum:=sum+a[i];end;end;writeln('Сумма чисел: ',sum);writeln('Кол-во: ',count);end.
Не тот ответ, который вам нужен?
Найди нужный
Самые новые вопросы
99335871
Другие предметы - 4 месяца назад

В какой оболочке земли живёт большинство живых организмов?

99335871
Другие предметы - 4 месяца назад

Из каких неживых частей состоит экосистема

mandrykin
Другие предметы - 4 месяца назад

На какие расы делятся население земли

kinda2007
Другие предметы - 4 месяца назад

Определение статуса военнослужащего (краткий ответ!!)

Санёк1999
Другие предметы - 4 месяца назад

Проведи следущие наблюдения в классе: один учащийся спокойно сидит за партой, слушая объяснения учителя; второй записывает план объяснения в тетради ; третий ученик вышел к доске отвечать на вопрос учителя. назови движущиеся тела. относительно каких других тел они движутся ?

Информация

Посетители, находящиеся в группе Гости, не могут оставлять комментарии к данной публикации.

Задай вопрос

Лучшие за месяц


Интересные статьи:


Пошаговый план подготовки к ЕГЭ за полгода для школьников
Не сдал ЕГЭ пересдача апелляция альтернативные пути
10 ошибок на ЕГЭ по русскому и способы их избежать
Выбор предметов ЕГЭ для поступления
Секреты подготовки к экзаменам дома от отличников