Найти сумму элементов массива С[1..10] кратных 3

28.01.2010, 16:43. **Показов** 3735. **Ответов** 3

Author24 — интернет-сервис помощи студентам

Здраствуйте! Нужно найти сумму элементов массива С[1..10] кратных 3. Напишите решение пожалуйста! Заранее очень благодарен!

@Dmc94 · 28.01.2010, 16:53

Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
var a,b,c,i:integer;
m:array[1..10] of integer;
s:array[1..10] of longint;
begin
for i:=1 to 10 do
readln(m[i]);
for i:=1 to 10 do
if (m[i] mod 3=0) then s[i]:=m[i];
for i:=1 to 10 do
a:=a+s[i];
writeln(a);
readln;
end.

31.01.2010, 17:17

а с комментариями как будет?

@Puporev · 31.01.2010, 17:21

Pascal
1
2
3
4
5
6
7
8
9
10
11
12
var a,b,c,i:integer;
m:array[1..10] of integer;
  s:integer; 
begin
for i:=1 to 10 do
readln(m[i]);
s:=0;
for i:=1 to 10 do
if (m[i] mod 3=0) then s:=s+m[i];
write(s);
readln;
end.

Новые блоги и статьи Все статьи Все блоги /
Сопоставление с образцом (Pattern Matching) в Python: Списки и словари py-thonny 19.03.2025 Программисты любят, когда код говорит сам за себя. Представьте, что вы можете просмотреть структуру данных и мгновенно понять, что с ней делать — без сложных условий и вложенных проверок. Именно эту. . .	Работа с метаданными EXIF и JPEG в JavaScript run.dev 19.03.2025 Работа с изображениями в веб-разработке нередко выходит за рамки простого отображения картинки. Современные задачи требуют глубокого понимания структуры файлов и умения манипулировать их внутренними. . .	Чеклист для Kubernetes в продакшене: Лучшие практики для SRE Mr. Docker 19.03.2025 Когда сталкиваешься с запуском Kubernetes в продакшене, невольно задаешься вопросом: почему то, что так гладко работало в тестовой среде, вдруг начинает вызывать головную боль на боевых системах?. . .	Разработка продвинутого ИИ в Unity с использованием Behavior Graph GameUnited 19.03.2025 В разработке игр искусственный интеллект персонажей часто становится тем элементом, который превращает хорошую игру в выдающуюся. До недавнего времени разработчикам под Unity приходилось либо писать. . .	Словари в Python: методы работы, оптимизация, сериализация py-thonny 19.03.2025 Каждый хотя бы раз сталкивался с необходимостью хранить связанные данные, где важна не только сама информация, но и их взаимосвязь. В дебрях Python словари — это тот универсальный инструмент, который. . .
Реализация паттерна CQRS с Event Sourcing в PHP Jason-Webb 19.03.2025 CQRS (Command Query Responsibility Segregation) — это архитектурный паттерн, который разделяет операции чтения и записи данных в приложении. Если вы столкнулись с ситуацией, когда ваше PHP-приложение. . .	std::span в C++: Подпредставления и срезы NullReferenced 18.03.2025 Если вы когда-нибудь работали с большими объемами данных в C++, то наверняка сталкивались с необходимостью манипулировать отдельными частями массивов или контейнеров. Традиционные подходы часто. . .	std::span в C++: Доступ к элементам и итерирование NullReferenced 18.03.2025 В C++ каждый разработчик сталкивается с проблемой эффективного управления последовательностями данных. Представьте: вы работаете с массивом, передаете его в функцию, а затем в другую, и каждый раз. . .	Утечки памяти в C# UnmanagedCoder 18.03.2025 Когда мы говорим о разработке приложений на C#, то часто успокаиваем себя мыслью, что сборщик мусора решит все наши проблемы с памятью. "Память управляется автоматически" — эта мантра прочно засела в. . .	std::span в C++: Введение в невладеющее представление NullReferenced 18.03.2025 С появлением стандарта C++20 у нас появился новый инструмент — std::span, который представляет собой невладеющее представление для работы с последовательностями данных. std::span — это легковесный. . .

Neon_L
		1
	Найти сумму элементов массива С[1..10] кратных 3 28.01.2010, 16:43. Показов 3735. Ответов 3 Метки нет (Все метки) Здраствуйте! Нужно найти сумму элементов массива С[1..10] кратных 3. Напишите решение пожалуйста! Заранее очень благодарен!

Neon_L
	31.01.2010, 17:17	3
	а с комментариями как будет?

Опции темы