Формулировка задачи:
Программа вводит в массив 10 случайных элементов.Найти сумму элементов которые кратны 5.(Составить с циклом предусловия while)
Начало я могу составить:
Program S_1; Const k=10; Var A:array [1..k] bute; i,n,s:bute; Begine Randomize
… а вот дальше никак.Помогите!
Код к задаче: «Найти сумму элементов массива, которые кратны 5»
textual
program S_1;
const n=10;
var a:array [1..n] of Integer;
i,s:Integer;
begin
Writeln('Исходный массив:');
Randomize;
while i<>n do
begin
inc(i);
a[i]:=Random(31);
Write(a[i],' ');
if a[i] mod 5=0 then s:=s+a[i];
end;
Writeln;
Writeln('Сумма элементов,которые кратны 5: ',s);
Readln;
end.
Полезно ли:
14 голосов , оценка 3.714 из 5
Сообщение от Croessmah
Где гарантия этого?
гарантия дана в условии, если человек вводит число элементов массива, но наверняка он не напишет 100500, чтобы потом все сидеть вводить.
Сообщение от Croessmah
по условию дано
надо просто делать что просят
Сообщение от Croessmah
великий и могучий.
именно
Сообщение от Croessmah
да мне, если честно, вообще до лампочки что там кто хочет. Надо — еще придут я предложил свой вариант.
с этого надо было и начинать
Сообщение от Croessmah
потому что так всегда — проект дорабатывается уже в разработке, потому как учесть всего невозможно
И вообще это спор бессмысленный, потому как следующий вопрос будет, — «А что такое vector?».
это не проект, это школьная задача. Но даже, если бы и был им, то он дорабатывается, согласно условия автора, а не согласно своим предпочтениям. Можно попросить сделать жигули, а тебе дадут камаз, — а скажут, мы начали делать жигули как вы и просили, но тут вот подумали, камаз же больше груза увезет и надежней и решили вот сделать его. Потому, что «а вдруг» дорога будет длинной, «а вдруг» с дачи багажника не хватит, «а если» будет авария, он же безопасней и тд и тп
Переменные разделяются запятой.
Операторы точкой с запятой
Нет
……………………………
Ctrl+ — Увеличивает масштаб страницы или изображения в ворде браузерах и т.д.
Ctrl- — Уменьшает масштаб страницы или изображения в ворде браузерах и т.д
End — Перейти в конец страницы
Home- Перейти в начало страницы
Page Up — <span>Для перемещения на один экран вверх </span>
Page Downd — Для перемещения на один экран вниз
Ctrl+Page Up — в документах (переход вниз на 1-ну страницу); в браузере (перейти на один экран влево)
Ctrl+Page Down — в документах (переход вверх на 1-ну страницу); в браузере (перейти на один экран вправо)
Ctrl+Home — сразу в начало текста
Ctrl+End — сразу в конец текста
Кол-во шаров = (N*60+M)/X
Ответ:
1: анимация
2: Гиперссылка упрощает переход по слайдам во время показа. Ускоряет доступ к данным из внешних источников.
Объяснение:
Найти сумму элементов кратных 5 в одновременном массиве.
На этой странице находится ответ на вопрос Найти сумму элементов кратных 5 в одновременном массиве?, из категории
Информатика, соответствующий программе для 10 — 11 классов. Чтобы посмотреть
другие ответы воспользуйтесь «умным поиском»: с помощью ключевых слов
подберите похожие вопросы и ответы в категории Информатика. Ответ, полностью
соответствующий критериям вашего поиска, можно найти с помощью простого
интерфейса: нажмите кнопку вверху страницы и сформулируйте вопрос иначе.
Обратите внимание на варианты ответов других пользователей, которые можно не
только просмотреть, но и прокомментировать.
Найдите правильный ответ на вопрос ✅ «1) Задан массив из 11 целых чисел. Найти сумму элементов массива, кратных 5 2) Задан массив из 11 целых чисел. Посчитать количество …» по предмету 📘 Информатика, а если вы сомневаетесь в правильности ответов или ответ отсутствует, то попробуйте воспользоваться умным поиском на сайте и найти ответы на похожие вопросы.
Смотреть другие ответы
Главная » Информатика » 1) Задан массив из 11 целых чисел. Найти сумму элементов массива, кратных 5 2) Задан массив из 11 целых чисел. Посчитать количество нечётных элементов массива. 3) задан массив из 9 целых чисел. Вывести на экран чётные элементы