|
|
| Другие темы раздела | |
| Pascal одномерный массив одномерный массив из десяти рамдомных чисел (от 0 да 100). указать порядок наименьшего числа. https://www.cyberforum.ru/ pascal/ thread64654.html |
Рекурсия: нахождение двойного факториала Pascal вот не знаю,как описать рекурсивную функцию нахождения двойного факториала.. вот мой вариант,он он естественно не правильный)) uses crt; function Factorial(N:integer):longint; var i:byte; t:longint; begin if odd(N)then |
|
Pascal кодирование изображений
https://www.cyberforum.ru/ pascal/ thread64633.html Такой вопрос,может кто знаком с кодированием(декодированием) изображений бинарными деревьями?Если есть какие нибудь примеры работы с ними,как само изображение(черно-белое) задать,как разбивать его и тд...поделитесь,плиз,примерами программ)) брала книгу Чэн-Ш.-К.Принципы проектирования систем визуальной информации.В алгоритме разобралась,но как сама программа должна строиться-проблема... надеюсь... |
Pascal Колво возможных произведений Есть число 2<=k<=1.000.000 нужно найти маскимальное колво произведений(1х4 и 4х1 это разные произведения). Например для числа 6 это 6х1 1х6 2х3 3х2 Как это реализовать?? Для мелких чисел легко найти,а вот если будет 600.000,например,то сразу запинаюсь. https://www.cyberforum.ru/ pascal/ thread64626.html |
|
Pascal Расчет средней гармонической величины Помогите пожалуйста!нужно разработать функцию пользователя для расчета средней гармонической величины х по форуле x(n)=k/(сумма от Е до k (1/x(I)) как вычислить сумму гармонического ряда напишу сейчас, исправьте мне чтоб с функцией пользователя была пожалуйста var k:integer; i:integer; s:real; begin write('k=');readln(k); s:=0; for i:=1 downto 1 do s:=s+1/i;... |
Pascal Найти разность первой и последней компоненты файла вещественных чисел
https://www.cyberforum.ru/ pascal/ thread64617.html Задача такая: Записать в файл последовательного доступа N действительных чисел. Найти разность первой и последней компонент файла. Я сделал вывод случайных чисел в строчку в файл. Эта часть программы работает. Не получается найти разность первой и последней компоненты файла |
| Pascal строки дана последлвательность символов. если в слове есть цифра, то заменить после нее все символы до конца слова на данный элемент. для каждого слова подсчитать количество замен https://www.cyberforum.ru/ pascal/ thread64600.html |
Найти матрицу k*A(в квадрате)+mE Pascal Нужно решить: любое число(K) умножить на матрицу в квадрате(A) и плюс число(M) умноженное на (E) - единичная матрица. Благодарю заранее... |
| Pascal Подсчет букв в файле. привет! ребята, помогите кто-нибудь, бьюсь третий день над программой:wall:, не получается. если кто может, помогите: нужно написать программу которая выдает количество букв из текстового файла всего алфавита( пример: а=4 б=7 в=9 г=2 и так далее...), а потом двух буквенная комбинация(пример: аа=0 аб=0 ав=1 .... и так до яю=0 яя=0). заранее спасибо!!! :):( https://www.cyberforum.ru/ pascal/ thread64588.html |
Pascal Двумерные массивы
https://www.cyberforum.ru/ pascal/ thread64573.html Приветствую всех! Прошу у вас помощи. Суть задания: Дана матрица из n элементов. Необходимо переписать её так, чтобы вместо одинаковых идущих подряд элементов оставался только один. Остаток таблицы заполнить нулями. Вот наработки: Program sgatie; Uses crt; Const n=2;l=4; Var a: array of integer; i,j,k:integer; Begin |
|
Pascal 2 минимума массива Уважаемые программисты!,помогите, пожалуйста, з задачей,срочно нужно...я уже просил об этом в предыдущей теме ,но никто так и робочего кода не выложил. Задача такая : найти 2 минимума в массиве А с N элементов.(Пример в массиве А(-1,4,0,3,12,6) - это будут -1 и 0) вот мой код : program n20; var a:array of integer; i,min1,min2,n:integer; begin writeln('vvedit rozmir massiva'); |
Pascal 3 массива Можете чем-нибудь помочь...Буду премного благодарен. Даны три одномерных массива: A из 15, B из 20 и C из 10 элементов соответственно. Какой из массивов имеет наименьшее количество отрицательных элементов. Вводить элементы вручную. В двух вариантах: с процедурой общего вида и с функцией. https://www.cyberforum.ru/ pascal/ thread64534.html |
|
2923 / 844 / 324
Регистрация: 30.04.2009
Сообщений: 2,633
|
||||||
| 17.11.2009, 14:43 | 0 | |||||
Найти значение элемента ближнего к сред.арифм. - Pascal - Ответ 36010217.11.2009, 14:43. Показов 1055. Ответов 6
Метки (Все метки)
Ответ
Вернуться к обсуждению: Найти значение элемента ближнего к сред.арифм. Pascal
1
|
||||||
| 17.11.2009, 14:43 | |
|
Готовые ответы и решения:
6
Массивы (вычислить сред. арифм. значение элементов каждой строки и столбца)
Найти адрес ячейки, со значение близким к ср.арифм. матрицы |
| 17.11.2009, 14:43 | |
| 17.11.2009, 14:43 | |
|
Помогаю со студенческими работами здесь
0
Массив: Вычислить сред. арифметическое и сред. геометрическое.
|