сервис вопросов и ответовНаписать программу размер массива и сам двухмерный массив целыз чисел вводятся с клавиатуры.Найти сумму элементов массива которые делятся на 5 и 8
10-11 класс|
|
одновременно
Katenok1905
27 июня 2013 г., 16:52:43 (10 лет назад)
Priemyshev95
27 июня 2013 г., 18:51:38 (10 лет назад)
program Project1;
var a :array of array of integer; n, m, i, j, sum :integer;
begin
readln(n,m); SetLength(a,n,m);
for i := 0 to n-1 do for j := 0 to m-1 do readln(a[i,j]); sum:= 0; for i := 0 to n-1 do for j := 0 to m-1 do if (a[i,j] mod 5 = 0) and (a[i,j] mod 8 = 0) then sum:= sum + a[i,j];
end.
Ответить
Другие вопросы из категории
Здравствуйте,
помогите с задачей на PascalABC.
Найти и вывести все шипящие буквы ( без повторений ), которые встретились в самом длинном слове.
1.Почему современные персональные компьютеры в сотни раз меньше но при этом в сотни раз быстрее эвм первого поколения?
2.Почему современные персональные компьютеры доступен для массового потребления?
Срочно! Ответьте, пожалуйста!!!
Класс может иметь интерфейс для доступа к его экземплярам извне. Он реализуется модификаторами доступа:
1. private
2. inline
3. public
4. protected
5. static
Читайте также
Известна математическая задача: "Существуют ли два последовательных натуральных числа, сумма цифр каждого из которых делится на 7?" Напишите программу,
которая отвечает на вопрос: "Существуют ли два последовательных числа, не превосходящих , сумма цифр каждого из которых делится на
?"
Входные данные. Два числа
Выходные данные. Программа выводит два таких числа, если они существуют, "NO" - если нет.
ПОМОГИТЕ НАПИСАТЬ ПРОГРАММУ В PASCAL! ПОЖАЛУЙСТА!
Дан массив X(N,M). Если первый элемент массива положительный, то найти сумму элементов среди элементов четных строк массива, иначе произведение.
Помогите пожалуйста составить программу на языке программирования Паскаль дан двухмерный массив целых чисел.Определить сумму тех элементов
массива,сумма индексов которых равна s
Написать программу на turbo pascal.
1.Вычислить значение факториала n! (P=1*2*...*n*N)..N=12
2.Найти сумму элементов заданного массива C[1..n]. Данные для ввода: n=7; C[1;2;3;-4;5;-6;7].
3.
нужно написать программу на языке паскаль по условию:
Найти сумму элементов массива расположенных до последнего положительного элемента
Буду бескрайне благодарна, если поможете мне))
Вы находитесь на странице вопроса "Написать программу размер массива и сам двухмерный массив целыз чисел вводятся с клавиатуры.Найти сумму элементов массива которые делятся на 5 и 8", категории "информатика". Данный вопрос относится к разделу "10-11" классов. Здесь вы сможете получить ответ, а также обсудить вопрос с посетителями сайта. Автоматический умный поиск поможет найти похожие вопросы в категории "информатика". Если ваш вопрос отличается или ответы не подходят, вы можете задать новый вопрос, воспользовавшись кнопкой в верхней части сайта.