Форум программистов, компьютерный форум, киберфорум
Наши страницы

Pascal ABC

Войти
Регистрация
Восстановить пароль
 
ZOTAC
1 / 1 / 0
Регистрация: 21.02.2013
Сообщений: 20
#1

Написать процедуру, которая удаляет из одномерного вещественного масива наибольшее значение - Pascal ABC

07.03.2013, 14:10. Просмотров 329. Ответов 1
Метки нет (Все метки)

Напишите процедуру, которая удаляет из одномерного вещественного масива наибольшее значение.
0
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
Similar
Эксперт
41792 / 34177 / 6122
Регистрация: 12.04.2006
Сообщений: 57,940
07.03.2013, 14:10
Я подобрал для вас темы с готовыми решениями и ответами на вопрос Написать процедуру, которая удаляет из одномерного вещественного масива наибольшее значение (Pascal ABC):

Написать процедуру линейной сортировки одномерного вещественного массива - Pascal ABC
Написать процедуру линейной сортировки одномерного вещественного массива:)

Написать процедуру, которая удаляет из строки все конечные пробелы - Pascal
2. Написать процедуру, которая удаляет из строки все конечные пробелы.

Описать процедуру, которая удаляет из списка L второй элемент - Pascal ABC
Описать процедуру, которая удаляет: из списка L второй элемент, если такой есть. Заранее спс)

Составить процедуру, которая удаляет в слове четные буквы - Pascal ABC
Необходимо составить процедуру, которая удаляет в слове четные буквы. Помогите, пожалуйста Добавлено через 12 минут procedure...

Найти ошибку в программе. Написать процедуру или функцию, которая вычисляет значение выражения f(x). - Pascal
1. Найти область допустимых значений аргумента x. 2. Написать процедуру или функцию, которая вычисляет область допустимых значений...

Описать процедуру, которая удаляет из списка L второй элемент, если такой есть - Pascal
Здравствуйте! Помогите пожалуйста написать программу, совершенно не могу разобраться Вот сама задача:Описать процедуру, которая...

1
Puporev
Модератор
53844 / 41477 / 14582
Регистрация: 18.05.2008
Сообщений: 97,215
07.03.2013, 15:00 #2
Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
uses crt;
const nmax=100;
type mas=array[1..nmax] of real;
procedure delmax(var a:mas;var n:byte);
var i,imx:byte;
begin
imx:=1;
for i:=1 to n do
if a[i]>a[imx] then imx:=i;
writeln('Максимальный элемент=',a[imx]:0:2);
if imx=n then n:=n-1
else
 begin
  for i:=imx to n-1 do
  a[i]:=a[i+1];
  n:=n-1;
 end;
writeln('Удаление максимального элемента');
for i:=1 to n do
write(a[i]:5:2);
end;
var a:mas;
    n,i:byte;
begin
randomize;
repeat
write('Размер массива до ',nmax,' n=');
read(n);
until n in [1..nmax];
writeln('Исходный массив:');
for i:=1 to n do
 begin
  a[i]:=9*random;
  write(a[i]:5:2);
 end;
writeln;
delmax(a,n);
end.
1
MoreAnswers
Эксперт
37091 / 29110 / 5898
Регистрация: 17.06.2006
Сообщений: 43,301
07.03.2013, 15:00
Привет! Вот еще темы с ответами:

Составить процедуру, которая удаляет из матрицы строки, целиком состоящие из нулевых элементов - Pascal
Составить процедуру, которая удаляет из матрицы строки, целиком состоящие из нулевых элементов, а затем определяет минимальный и...

Описать процедуру, которая удаляет из стека первый отрицательный элемент, если такой есть - Pascal
Описать процедуру, которая удаляет из стека первый отрицательный элемент, если такой есть (опять же динамические структуры)

Написать программу, которая удаляет из строки все группы, заканчивающиеся на 10 - Pascal ABC
Строка вводится с клавиатуры. После выводится измененная. Программу вроде написал, но работает некорректно. program abc; var ...

Написать программу, которая удаляет все слова из заданной строки - Pascal
Написать программу, которая удаляет все слова из заданной строки длиной более К символов.


Искать еще темы с ответами

Или воспользуйтесь поиском по форуму:
2
Ответ Создать тему
Опции темы

КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin® Version 3.8.9
Copyright ©2000 - 2018, vBulletin Solutions, Inc.
Рейтинг@Mail.ru