дан массив натуральных чисел,заполненный случайными числами. найти произведение элементов кратных 3.
5-9 класс
|
s := 1 ;
for i := 1 to n do
if a[i] mod 3 = 0 then
s := s * a[i];
writeln(s);
Другие вопросы из категории
на тестах при разных вариантах значений исходных данных.
2.Эволюция графического редактора – начиная от самого простого (например, Paint) до профессионального (например, Photoshop) и объяснить, как развивались программы, для каких задач нужна каждая из них и каковы их особенности.
Даю 30 баллов.
дискретизации- 44000, разрядность – 16 битов). Какова максимальная
продолжительность стереозаписи на диске емкостью 700Мбайт?
Читайте также
2.Дан массив целых чисел из 25 элементов. Заполнить его случайными числами от 0 до 50. Заменить все четные элементы на их квадраты, а нечетные удвоить.
2. Дан массив целых чисел,найти количество отрицательных элементов массива.
3. Дан массив целых чисел,найти количество чётных чисел в массиве.
2)Дан массив целых чисел.Найти сумму четных положительных чисел, стоящих на нечетных местах и количество отрицательных элементов, стоящих на четных местах.
3)дан массив целых чисел.найти сумму четных и положительных элементов, расположенных до первого отрицательного элемента.Примечание:при вводе необходимо учесть, что первый элемент не может быть отрицательным.
файла.Результат поместить в файл g.
дан файл f компоненты которого являются целыми числамию Найти наибольший и наименьший из компонентов файла.результат поместить в файл g
ДАн файл f компоненты которого являются целыми числами найти количество чётных чисел среди компонентов.результат поместить в файл g
Дан файл F компоненты которого являяются целыми числами.записать в файл g все чётных числа файла f
Дан файл F компоненты которого являяются целыми числами переписать компоненты файла f в файл g,так чтобы в файле сначала шли отрицательные а потом положительные числа.