Форум программистов, компьютерный форум, киберфорум
PascalABC.NET
Войти
Регистрация
Восстановить пароль
Карта форума Темы раздела Блоги Сообщество Поиск Заказать работу  
Другие темы раздела
PascalABC.NET Задача с сигмой(суммой ряда)2 https://www.cyberforum.ru/ pascalabc-net/ thread2510437.html
S=\sum_{k=0}^{100}{-1}^{k}\frac{{t}^{2k}}{(2k)!}\times {M}^{k(2k-1)} Нужно с циклом for.Ответ должен быть равным cos(t)
Поиск и удаление дробной части в файле с "бесконечной" строчкой PascalABC.NET
Всем привет! Снова "бесконечная" строчка в файле. =-O Она одна, других строчек в файле нет. Нужно найти и удалить дробную часть(после точки, вместе с точкой) двух чисел через запятую после символов XI и YI. %-) оставшееся целое число может быть с минусом. Пример:
PascalABC.NET Олимпиадная задача по программированию. PascalABC.NET https://www.cyberforum.ru/ pascalabc-net/ thread2510121.html
Здравствуйте, я готовлюсь к школьной олимпиаде по информатике, не могу решить задачу (85 баллов из 100). Помогите, пожалуйста. Условие В этом году третий раз одна известная компания проводит соревнование по программированию искусственного интеллекта для игровых стратегий. В этот раз участникам предложили написать искусственный интеллект для управления командой хоккеистов. После проведения...
PascalABC.NET Делители https://www.cyberforum.ru/ pascalabc-net/ thread2509963.html
Задано число n. Требуется найти число от 1 до n, включительно, которое имеет максимальное число положительных целых делителей. Например, если n = 20, то искомое число — 12, у него 6 делителей: 1, 2, 3, 4, 6, 12. ------------------------------------------------------------- Формат входных данных На вход подается одно число n (1 ≤ n ≤ 105)...
найти сумму с точностью E PascalABC.NET
s=3/(x+3)-4/((x+3)(x+4))+5/((x+3)(x+4)(x+5))-...
PascalABC.NET Программа для разложения числа на три целых куба Здравствуйте! Что вы думаете над этим кодом? Можно ли написать как-нибудь по-другому? var n,a,b,c:integer; begin read (n); while ((a*a*a)+(b*b*b)+(c*c*c)<>n) do begin a:= random(-10000000,10000000); b:= random(-10000000,10000000); c:= random(-10000000,10000000); end; https://www.cyberforum.ru/ pascalabc-net/ thread2509624.html
PascalABC.NET Задача с сигмой(суммой ряда) https://www.cyberforum.ru/ pascalabc-net/ thread2509611.html
\sum_{k=0}^{100}{-1}^{k}\times \frac{{t}^{2k+1}}{(2k+1)!} Помогите решить
PascalABC.NET Дана последовательность с N элементов, увеличить последовательность
Дана последовательность с N элементов, увеличить последовательность, добавляя после каждого элемента, такой же самый элемент. Пример Было: a1 a2 a3 a4 1 2 5 8 Стало: а1 а2 а3 а4 а5 а6 а7 а8
PascalABC.NET Дано двумерный массив, удалить с массива максимальный элемент и минимальный Дано двумерный массив, удалить с массива максимальный элемент и минимальный. а1 а2 а3 а4 а5 а6 а7 а8 а9 а10 ||4|15|-3|0|-6|9|120|14|-5|9| https://www.cyberforum.ru/ pascalabc-net/ thread2509532.html PascalABC.NET Найти приближенное значение функции Найти приближенное значение функции при данном значении аргумента с помощью интерполяционного многочлена Лагранжа. x 0,41 0,46 0,52 0,60 0,65 0,72 y 2,57418 2,32513 2,09336 1,86203 1,74926 1,62098 x=0.478 https://www.cyberforum.ru/ pascalabc-net/ thread2509474.html
Круги на воде PascalABC.NET
Получить мультфильм "Круги на воде", используя семь концентрических окружностей. Центры окружностей должны быть совмещены с центром экрана, а радиусы изменяться от 42 до 82 пиксел, увеличиваясь на 7 пиксел с каждой следующей окружностью. Иллюзия движения должна создаваться последовательной сменой цветов всех окружностей, начиная с внутренней и кончая внешней. Процесс смены цветов следует...
PascalABC.NET надо написать прогу х елп ани те тупому студентешке https://www.cyberforum.ru/ pascalabc-net/ thread2509277.html
9. Написать программу, которая выводит таблицу значений функции в диапазоне от -2 до 2 с шагом 0,5. Ниже представлен рекомендуемый вид экрана во время работы программы. ---------------------- Х | y ---------------------- -2 | -22.6 -1.5 | -15.9 -1 | -10.4 -0.5 | -6.1 0 | -3.0 0.5 | -1.1
257 / 149 / 70
Регистрация: 29.07.2018
Сообщений: 1,241
09.10.2019, 18:10 0

Дан массив из n чисел найти сумму элементов которые кратны 5 - PascalABC.NET - Ответ 13887981

09.10.2019, 18:10. Показов 5410. Ответов 5
Метки (Все метки)

Ответ

daniil232425
Pascal
1
2
3
4
5
begin
  var mas := ArrRandom(ReadInteger);
  mas.Println;
  mas.Where(i -> i mod 5 = 0).Sum.Println;
end.


Вернуться к обсуждению:
Дан массив из n чисел найти сумму элементов которые кратны 5 PascalABC.NET
0
Заказать работу у эксперта
Programming
Эксперт
94731 / 64177 / 26122
Регистрация: 12.04.2006
Сообщений: 116,782
09.10.2019, 18:10
Готовые ответы и решения:

Дан массив Р(30) целых чисел. Найти среднее арифметическое тех элементов массива, которые кратны трем
Добрый вечер! Если не сложно подскажите, что не так в моем коде. Вот задание: Дан массив Р(30)...

Дан массив целых чисел. Найти сумму элементов массива,которые заканчиваются на 5.
ПОМОГИТЕ пож.... Дан массив целых чисел. Найти сумму элементов массива,которые заканчиваются на 5.

Массив натуральных чисел. Найти сумму тех элементов, которые кратны данному k
В массив a занесены натуральные числа. Найти сумму тех элементов, которые кратны данному k, которое...

Дан массив целых чисел. Найти элементы, которые кратны 3 и 7
дан массив целых чисел найти элементы которые положительны кратны 3 и 7

5
09.10.2019, 18:10
IT_Exp
Эксперт
87844 / 49110 / 22898
Регистрация: 17.06.2006
Сообщений: 92,604
09.10.2019, 18:10
Помогаю со студенческими работами здесь

Массив: Найти сумму тех элементов, которые кратны данному К.
В массив A занесены натуральные числа. Найти сумму тех элементов, которые кратны данному К. ...

Массив: Найти сумму элементов, которые больше 20, меньше 60 и кратны 7.
В двухмерном массиве найти сумму элементов, которые больше 20, меньше 60 и кратны 7.

Дан массив n длины, нужно найти числа кратны 9 и посчитать сумму таких чисел
Ребят помогите решить пару задач 1) дан массив n длины, нужно найти числа кратны 9 и посчитать...

Найти сумму положительных элементов массива целых чисел, которые кратны 7
Найти сумму положительных элементов массива целых чисел, которые кратны 7. Размер массива – 15....

0
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2024, CyberForum.ru