Предмет: Информатика,
автор: Aigori
Дан одномерный массив 30 целых чисел найти сумму элементов кратных своим индексам
Ответы
Автор ответа:
1
Решение предоставлено на фото ниже
Приложения:
Автор ответа:
0
===== PascalABC.NET =====
begin
var a := ArrRandom(30, 0, 99);
a.Println;
a.Where((v, i) -> (i > 0 ? v mod i = 0 : False)).Sum.Println
end.
Приложения:
Интересные вопросы
Предмет: Українська мова,
автор: 123123sadov
Предмет: Русский язык,
автор: dairsuyumbaev
Предмет: Математика,
автор: g81128413
Предмет: Алгебра,
автор: tokushev
Предмет: Алгебра,
автор: dareus