|
|
| Другие темы раздела | |
| Pascal ABC Верно ли, что в данном числе сумма цифр больше В, а само число делится на В Здравствуйте! Помогите пожалуйста решить задачу: 1. Дано натуральное число. Верно ли, что в данном числе сумма цифр больше В, а само число делится на В (В вводится с клавиатуры) Надо решить... https://www.cyberforum.ru/ pascalabc/ thread701934.html |
Вывести первое слово строки в обратном порядке Pascal ABC Помогите решить. Вывести первое слово строки в обратном порядке. |
|
Pascal ABC Другой способ
https://www.cyberforum.ru/ pascalabc/ thread701923.html Задача: Заменить все многоточия точками. Знаю, что задача идиотская, я ее решил 2 способами: №1 var sim:string; n:integer; begin writeln('строка'); readln(sim); |
Pascal ABC Циклы с заданным количеством повторений: Напечатать «столбиком» значения sin2, sin3,…, sin20 Циклы с заданным количеством повторений Напечатать «столбиком» значения sin2, sin3,…, sin20. https://www.cyberforum.ru/ pascalabc/ thread701886.html |
|
Pascal ABC Массивы: Найти произведение положительных элементов, значение которых меньше 10 Приветствую форумчане. Прошу вас помочь с заданием. За ранее огромное спасибо от всей группы. Задача: Массивы 1. Дан массив целых чисел из 20 элементов. Заполнить его с клавиатуры. Найти: -... |
Pascal ABC Массив: Определить, есть ли пара соседних элементов с произведением, равным числу 56 Приветствую форумчане. Прошу вас помочь с заданием. Задача: Массивы 1. Дан массив целых чисел из 20 элементов. Заполнить его с клавиатуры. Определить, есть ли пара соседних элементов с... https://www.cyberforum.ru/ pascalabc/ thread701862.html |
| Pascal ABC Из элементов массива Р сформировать массив М той же размерности по правилу Приветствую форумчане. Прошу вас помочь с заданием. За ранее огромное спасибо от всей группы. Задача: 1. Дан массив целых чисел из 20 элементов. Заполнить его с клавиатуры. Из элементов... https://www.cyberforum.ru/ pascalabc/ thread701860.html |
Умножить все элементы, кратные 5, на пятый элемент массива Pascal ABC Приветствую форумчане. Прошу вас помочь с заданием. За ранее огромное спасибо от всей группы. Задача: 1. Дан массив целых чисел из 20 элементов. Заполнить его с клавиатуры. Умножить все... |
| Pascal ABC Заменить первый отрицательный элемент буквой k Приветствую форумчане. Прошу вас помочь с заданием. За ранее огромное спасибо от всей группы. Задача: Массивы 1. Дан массив целых чисел из 20 элементов. Заполнить его с клавиатуры. Заменить... https://www.cyberforum.ru/ pascalabc/ thread701858.html |
Pascal ABC Паскаль. Узнать одинаковые поля записей
https://www.cyberforum.ru/ pascalabc/ thread701817.html Помогите! Вводим число больных. Для больных каждом указываем имя, фамилию, болезнь и т.д. Это я сделал. Суть задачи: 1) Вывести больных по дню рождения. - Это сделал. 2) Вывести тех больных,... |
|
Pascal ABC Найти, сколько слов в тексте заканчивается двойной согласной Помогите пожалуйста Найти, сколько слов в тексте заканчивается двойной согласной. |
Pascal ABC Составить программу вычисления и печати в виде таблицы значении функции и соответствующих аргументов Примечание: извлечение корня третьей степени и выше осуществлять по итерационной формуле Ньютона: https://www.cyberforum.ru/ pascalabc/ thread701764.html |
|
0 / 0 / 0
Регистрация: 23.10.2012
Сообщений: 9
|
|
| 19.11.2012, 12:14 [ТС] | 0 |
Подсчитать количество и сумму элементов массива, которые делятся на 5 без остатка - Pascal ABC - Ответ 372108719.11.2012, 12:14. Показов 7913. Ответов 2
Метки (Все метки)
Ответ
а как-то еще можно его упростить?
var m: array [1..10] of integer; j,s:integer ; begin randomize; for j:=1 to 10 do begin M [j]:=random (10) writeln ('M[',J,']=',M[J]); END; вот что я сам смог надумать :S Вернуться к обсуждению: Подсчитать количество и сумму элементов массива, которые делятся на 5 без остатка Pascal ABC
0
|
|
|
|
| 19.11.2012, 12:14 | |
|
Готовые ответы и решения:
2
Определить в матрице количество тех элементов, которые без остатка делятся на собственный индекс Одномерные массивы. Определить произведение элементов, которые без остатка делятся на 2 и не делятся на 3
|
| 19.11.2012, 12:14 | |
|
Помогаю со студенческими работами здесь
0
|