Описать функцию min (x) для определения минимального элемента вектора

@SlaWEEK · Регистрация: 30.05.2011

Author24 — интернет-сервис помощи студентам

Всем доброго дня. Есть необходимость решить 4 задания. По поиску на этом форуме на три из четырех зданий нашел такие же задания, но ни одного ответа на них нет (задания просил помочь сделать zheka89).

Может быть сейчас сможете помочь в решении. Очень нужно, просто край.

Ни же представлены сами задачи.

Задача 3

Pascal

1 2	const n=...; type vector = array [1..n] of real;

Описать функцию min (x) для определения минимального элемента вектора x, введя вспомогательную рекурсивную функцию min1 (k), находящую минимум среди последних элементов вектора x, начиная с k-го.

Указание: пусть min(x) – функция, которая вычисляет минимум среди элементов массива x, а min1(k) – функция, кото-рая вычисляет минимум среди элементов xk, xk+1, …, xn массива x (для этой функции массив x есть глобальная переменная, определенная в главной программе).
Имеем равенство

Pascal

1	min(x) = min1(1).

Определим функцию min1(k) рекурсивно:
1) если k=n, то функция возвращает результат xn;
2) если k<n, то функция возвращает наименьшее из двух чисел xk и min1(k+1) (второе число получается при рекурсивном вызове).

@Puporev · 04.06.2011, 14:09

И эта, раз есть у меня, значит есть на форуме... Все-таки насчет рук попробуйте....

Pascal

uses crt;
type mas=array[1..50] of integer;
var x:mas;
    n,k:integer;
function Mini(k:integer):integer;
 var mnk:integer;
 begin
 if k=n then Mini:=x[k]
 else
  begin
     mnk:=Mini(k+1);
     if mnk<x[k] then Mini:=mnk
     else Mini:=x[k];
  end;
 end;
function Min(x:mas):integer;
var i,mn:integer;
begin
mn:=Mini(k);
for i:=1 to k-1 do
if x[i]<mn then mn:=x[i];
Min:=mn;
end;
var i:integer;
begin
clrscr;
randomize;
write('Razmer massiva X n=');
readln(n);
writeln('Massiv X:');
for i:=1 to n do
  begin
    x[i]:=random(20);
    write(x[i],' ');
  end;
writeln;
write('k=');readln(k);
write('min=',Min(x));
readln
end.

@SlaWEEK · 04.06.2011, 14:20 **[ТС]**

Да что это такое, видимо действительно сегодня, что-то с руками стало...

Я могу свои сообщения по 3 и 4 задачи удалить с форума, если нет, то удалите вы как модератор...
Еще раз прошу прошения за невнимательность и за кривизну своих рук. Критика принята.

@SlaWEEK · 07.06.2011, 09:32 **[ТС]**

Puporev, Добрый день, у меня опять сложности с математикой - ну никак не могу до конца понять условия этой задачи.

@Puporev · 07.06.2011, 10:17

Но у Вас же все написано в условии, весь алгоритм, я просто записал это языком Паскаля...

type vector = array [1..n] of real;
Описать функцию min (x) для определения минимального элемента вектора x, введя вспомогательную рекурсивную функцию min1 (k), находящую минимум среди последних элементов вектора x, начиная с k-го.

Указание: пусть min(x) – функция, которая вычисляет минимум среди элементов массива x, а min1(k) – функция, кото-рая вычисляет минимум среди элементов xk, xk+1, …, xn массива x (для этой функции массив x есть глобальная переменная, определенная в главной программе).
Имеем равенство
min(x) = min1(1).
Определим функцию min1(k) рекурсивно:
1) если k=n, то функция возвращает результат xn;
2) если k<n, то функция возвращает наименьшее из двух чисел xk и min1(k+1) (второе число получается при рекурсивном вызове).

Если Вы это не понимаете, то что, по китайски написать?

@SlaWEEK · 07.06.2011, 10:45 **[ТС]**

Не, по китайски не надо...

Новые блоги и статьи
В чем отличие между INNER JOIN и OUTER JOIN bytestream 22.01.2025 В современных базах данных информация часто распределена между множеством взаимосвязанных таблиц, что делает операции объединения JOIN неотъемлемой частью работы с SQL. Эти операции позволяют. . .	Как сделать первую букву заглавной в JavaScript bytestream 22.01.2025 JavaScript предоставляет разработчикам множество инструментов для эффективной работы с текстовыми данными. Одной из часто встречающихся задач при обработке строк является преобразование первой буквы. . .	Что такое Big O нотация и алгоритмическая сложность bytestream 22.01.2025 Введение в алгоритмическую сложность В мире разработки программного обеспечения эффективность алгоритмов играет crucial роль в создании качественных приложений. Алгоритмическая сложность. . .	Как решать конфликты слияния (merge) в Git bytestream 22.01.2025 Конфликты слияния в системе контроля версий Git возникают в ситуациях, когда две или более ветки разработки содержат несовместимые изменения в одних и тех же участках кода. Эти конфликты представляют. . .	Как использовать регулярные выражения bytestream 22.01.2025 Регулярные выражения представляют собой мощный инструмент для работы с текстовыми данными, который позволяет осуществлять поиск, проверку и манипуляцию строками на основе определенных шаблонов. Этот. . .	Как выйти из Vim bytestream 22.01.2025 Vim (Vi IMproved) представляет собой один из самых влиятельных текстовых редакторов в истории компьютерной индустрии, эволюционировавший из своего предшественника Vi, созданного Биллом Джоем в 1976. . .
NoSQL базы данных: что это такое и какие существуют bytestream 22.01.2025 В современную эпоху цифровой трансформации объемы данных растут экспоненциально, создавая новые вызовы для традиционных систем управления базами данных. NoSQL (Not Only SQL) представляет собой. . .	Обновление исследования от команды MCM (январь 2025 г.) Programma_Boinc 22.01.2025 Обновление исследования от команды MCM (январь 2025 г. ) Мы продолжаем изучать молекулярные сигнатуры, связанные с раком легких, с текущим фокусом на GCM1, факторе транскрипции, участвующем в. . .	Как работать с Kafka в Go (Golang) bytestream 22.01.2025 Apache Kafka представляет собой распределенную платформу потоковой передачи данных, которая произвела революцию в области обработки событий и интеграции микросервисов. Эта система, изначально. . .	Как использовать RabbitMQ в Go (Golang) bytestream 22.01.2025 RabbitMQ представляет собой надежный и широко используемый брокер сообщений, который играет ключевую роль в построении современных распределенных систем и микросервисной архитектуры. В основе работы. . .	Как преобразовать список списков в простой список в Python bytestream 22.01.2025 При работе с Python разработчики часто сталкиваются с необходимостью обработки сложных структур данных, среди которых особое место занимают вложенные списки. Эти структуры представляют собой списки,. . .	Что такое GUID / UUID и как их создать bytestream 22.01.2025 В мире разработки программного обеспечения существует постоянная потребность в уникальной идентификации объектов, записей и ресурсов. Эта задача становится особенно актуальной в распределенных. . .

@SlaWEEK 0 / 0 / 0 Регистрация: 30.05.2011 Сообщений: 25
	04.06.2011, 14:20 [ТС]	3
	Да что это такое, видимо действительно сегодня, что-то с руками стало... Я могу свои сообщения по 3 и 4 задачи удалить с форума, если нет, то удалите вы как модератор... Еще раз прошу прошения за невнимательность и за кривизну своих рук. Критика принята. 0

@SlaWEEK 0 / 0 / 0 Регистрация: 30.05.2011 Сообщений: 25
	07.06.2011, 09:32 [ТС]	4
	Puporev, Добрый день, у меня опять сложности с математикой - ну никак не могу до конца понять условия этой задачи. 0

@Puporev Почетный модератор 64305 / 47602 / 32742 Регистрация: 18.05.2008 Сообщений: 115,182
	07.06.2011, 10:17	5
	Но у Вас же все написано в условии, весь алгоритм, я просто записал это языком Паскаля... type vector = array [1..n] of real; Описать функцию min (x) для определения минимального элемента вектора x, введя вспомогательную рекурсивную функцию min1 (k), находящую минимум среди последних элементов вектора x, начиная с k-го. Указание: пусть min(x) – функция, которая вычисляет минимум среди элементов массива x, а min1(k) – функция, кото-рая вычисляет минимум среди элементов xk, xk+1, …, xn массива x (для этой функции массив x есть глобальная переменная, определенная в главной программе). Имеем равенство min(x) = min1(1). Определим функцию min1(k) рекурсивно: 1) если k=n, то функция возвращает результат xn; 2) если k<n, то функция возвращает наименьшее из двух чисел xk и min1(k+1) (второе число получается при рекурсивном вызове). Если Вы это не понимаете, то что, по китайски написать? 1

@SlaWEEK 0 / 0 / 0 Регистрация: 30.05.2011 Сообщений: 25
	07.06.2011, 10:45 [ТС]	6
	Не, по китайски не надо... 0

Опции темы

Описать функцию min (x) для определения минимального элемента вектора

Решение