Free Pascal

Форум программистов и сисадминов Киберфорум

Войти

Регистрация
Восстановить пароль

Другие темы раздела
Free Pascal Найти минимальное число и поменять его местами с предпоследним элементом массива https://www.cyberforum.ru/ free-pascal/ thread1358987.html Создать одномерный динамический массив произвольного размера. Ввести значение элементов массива. Найти минимальное число и поменять его местами с предпоследним элементом массива.	Составить программу для нахождения значения функции в точке а Free Pascal Составить программу для нахождения значение функции в точке а. Значение а вводится с клавиатуры. f(x)=\begin{cases}-3x+2\sin x&\text{, }x<-1\\\\\|x\|&\text{, }-1\leq x<0\\\\x\ln (x+1)&\text{, }x\geq...
Free Pascal Перевод числа в двоичную систему счисления https://www.cyberforum.ru/ free-pascal/ thread1358271.html Ув. пользователи, никак не могу написать программу. Сижу пару дней над ней. Задание: Вывести представление данного натурального числа.	Free Pascal Нахождение количества делителей числа Даны 2 числа (А и В). У какого из этих чисел больше делителей? https://www.cyberforum.ru/ free-pascal/ thread1358246.html
Определить количество голов купленного скота Free Pascal 3)Жена дала мужу 100 долларов,на которые он должен купить 100 голов скота.Бык стоит 10 долларов,корова 5 долларов,теленок 50 центов.	Free Pascal На складе шоколад распределен в ящики 16, 17, 21 кг. Сколько ящиков каждого веса? 2)Дано 270кг шоколада.На складе шоколад распределен в ящики 16,17,21 кг.Сколько ящиков каждого веса? https://www.cyberforum.ru/ free-pascal/ thread1357280.html
Free Pascal Найти число с большим количеством знаменателей https://www.cyberforum.ru/ free-pascal/ thread1357279.html 1)заданы два числа A,B.Найти число с большим количеством знаменателей.	Free Pascal 2 маленьких несложных задания в 1 строку Ув. пользователи форума, столкнулся с проблемой: не могу решить 2 оставшихся примера. Знаю,что решение каждого в 1 строчку, но все,что я пробовал - было неверно. Помогите пожалуйста, кто знает: ...
Free Pascal Программа-анкета: использовать файл записей https://www.cyberforum.ru/ free-pascal/ thread1356489.html Добрый день! Помогите пожалуйста с программой. Нужно написать её как файл записей. Я попробовала, но что-то не особо получилось. Пожалуйста, помогите написать программу Program Z9; Procedure...	Free Pascal Условный оператор, который эквивалентен оператору присваивания https://www.cyberforum.ru/ free-pascal/ thread1356487.html Ув. пользователи форума, столкнулся с проблемой: не могу решить 3 маленькие задачи. Помогите пожалуйста, кто знает: №3. Условный оператор,который эквивалентен оператору присваивания x:=a or b and...
Free Pascal Найти числа bk k=1, m, где bk-наименьший элемент k-ого столбца Помогите, кто знает.Даны натуральные числа n,m и действительная прямоугольная матрица aij i=1,n j=1,m. Найти числа bk k=1,m ,где bk-наименьший элемент k-ого столбца.	Free Pascal Остров На клетчатой бумаге нарисована карта острова (клетки острова закрашены). При этом остров является клетчато-выпуклой фигурой, то есть каждая горизонтальная или вертикальная линия на карте либо не... https://www.cyberforum.ru/ free-pascal/ thread1356330.html

volvo

Супер-модератор

32580 / 21051 / 8131

Регистрация: 22.10.2011

Сообщений: 36,323

Записей в блоге: 8

23.01.2015, 15:51

Найти максимальный элемент динамического массива и умножить этот элемент на каждый в этом массиве - Free Pascal - Ответ 7141121

23.01.2015, 15:51. Показов 3923. Ответов 3

Метки (Все метки)

Ответ

ZX Spectrum-128, нахождение максимума при использовании FPC можно уложить в один цикл:

Pascal

uses math;
var 
  maximum : integer;
  v : array of integer;
 
// ...
  maximum := a[0, 0];
  for v in a do
    maximum := max(maximum, maxintvalue(v));

Вернуться к обсуждению:
Найти максимальный элемент динамического массива и умножить этот элемент на каждый в этом массиве Free Pascal

Следующий ответ

Programming

Эксперт

94731 / 64177 / 26122

Регистрация: 12.04.2006

Сообщений: 116,782

23.01.2015, 15:51

Готовые ответы и решения:

Каждый четный элемент массива умножить на минимальный элемент, а нечетный на максимальный
В одномерном массиве, состоящем из n целых элементов, каждый четный элемент умножить на минимальный...

Найти мах элемент массива и его номер и умножить этот элемент на 5
Помогите найти ошибку в программе!!!!! срочно!!!! Задача: найти мах элемент массива А(N) и его...

Найти максимальный элемент в каждой строке массива и номер столбца, в котором этот максимальный элемент находится
Найти максимальный элемент в каждой строке массива и номер столбца, в котором этот максимальный...

Найти максимальный элемент массива x(15), поменять местами этот максимальный элемент с индексом 4
поможете с курсовым ?

IT_Exp

Эксперт

87844 / 49110 / 22898

Регистрация: 17.06.2006

Сообщений: 92,604

23.01.2015, 15:51

Помогаю со студенческими работами здесь

Найти в этом массиве минимальный элемент N и максимальный элемент M
Ввести с клавиатуры массив целых чисел. Найти в этом массиве минимальный элемент N и максимальный...

Дан массив целых чисел. Найти В этом массиве минимальный элемент т и максимальный элемент м. Вывести сумму элементов от минимального до максимального
Дан массив целых чисел. Найти В этом массиве минимальный элемент т и максимальный элемент м....

Найти максимальный элемент массива . Поменять столбец, содержащий этот элемент с последним столбцом двумерного массива
Ввести двумерный массив размером 3*4. Найти максимальный элемент массива . Поменять столбец,...

Умножить каждый элемент матрицы на максимальный элемент
Доброе время суток. помогите. Дана матрица 4х5. Умножить каждый элемент матрицы на максимальный...

Наверх