сервис вопросов и ответовДан массив из n чисел. Найти произведение тех чисел, которые имеют последние цифры 1 и 5,иначе посчитать количество. Помогите пожалуйста!
5-9 класс|
|
Sanya0602
05 февр. 2014 г., 1:19:53 (10 лет назад)
кланс
05 февр. 2014 г., 2:02:35 (10 лет назад)
var a: array [1..1000] of integer; i, n, k: integer; m: longint;
begin
read(n);
for i := 1 to n do
read(a[i]);
m := 1;
k := 0;
for i := 1 to n do
if (a[i] mod 10 = 1) or (a[i] mod 10 = 5)
then
m := m * a[i]
else
k := k + 1; {Я понял задание так: если числа не оканчиваются на 1 или 5, то подсчитать их количество}
writeln('Multiplication: ', m);
writeln('Other numbers: ', k);
end.
Ответить
Другие вопросы из категории
В Норильске, Москве, Ростове и Пятигорске живут 4 супружеские пары, причем в каждом городе живет только одна супружеская пара. Имена этих супругов:
Антон, Борис, Давид, Григорий, Ольга ,Мария, Светлана, Екатерина. Антон живет в Норильске, Борис и Ольга – супруги, Григорий и Светлана не живут в одном городе, Мария живет в Москве, Светлана – ростовчанка . Кто на ком женат и кто где проживает?
Читайте также
1). Дан массив из n элементов (n >= 4). Подсчитать среднюю арифметическую второго и предпоследнего элемента массива.
2). Дан массив из n элементов. Написать программу подсчитывающую произведение элементов массива.
решить через паскаль через массивы)) 1.Дан одномерный массив из 10 элементов. Заменить все большие 7 члены массива числом 7. Найти количество
таких членов.
2.Дан массив из 10 элементов. Найти количество элементов с четными индексами.
3.Дан массив из 10 элементов. Найти наибольший элемент массива.
Вы находитесь на странице вопроса "Дан массив из n чисел. Найти произведение тех чисел, которые имеют последние цифры 1 и 5,иначе посчитать количество. Помогите пожалуйста!", категории "информатика". Данный вопрос относится к разделу "5-9" классов. Здесь вы сможете получить ответ, а также обсудить вопрос с посетителями сайта. Автоматический умный поиск поможет найти похожие вопросы в категории "информатика". Если ваш вопрос отличается или ответы не подходят, вы можете задать новый вопрос, воспользовавшись кнопкой в верхней части сайта.