Форум программистов, компьютерный форум, киберфорум
Наши страницы
Pascal (Паскаль)
Войти
Регистрация
Восстановить пароль
 
Рейтинг 4.67/6: Рейтинг темы: голосов - 6, средняя оценка - 4.67
Андрей_Андре
0 / 0 / 0
Регистрация: 04.09.2013
Сообщений: 15
1

Одномерные массивы: Удалить из массива максимальный элемент

04.09.2013, 12:40. Просмотров 1028. Ответов 1
Метки нет (Все метки)

Дан массив действительных чисел С(n) . Удалить из массива максимальный элемент .
Элементы стоящие после него сдвинуть влево. Последний элемент сделать нулевым.
0
Лучшие ответы (1)
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
Similar
Эксперт
41792 / 34177 / 6122
Регистрация: 12.04.2006
Сообщений: 57,940
04.09.2013, 12:40
Ответы с готовыми решениями:

Одномерные массивы. Удалить из массива элемент, первая цифра которого четная.
Помогите решить! СРОЧНО! Удалить из массива элемент, первая цифра которого четная. Буду очень...

Удалить строки массива, в которых находится максимальный элемент
Дан массив B(n*m). Элементы массива ввести с клавиатуры. Удалить строку, в которой находится...

Одномерные массивы. Вставка, удаление элементов массива. Перестановка элементов массива. Сортировка массива методом пузырька
Помогите пожалуйста! Дан массив, состоящий из N букв латинского алфавита а) Заполнить массив...

Одномерные массивы. Вычислить количество положительных элементов массива
Зачет хочу получить по информатике, помогите 1) "В одномерном массиве состоящем из т...

Массивы. Заменить максимальный элемент на противоположный по знаку
Имеется массив А из N произвольных чисел (A(N)), среди которых есть положительные, отрицательные и...

1
CodeR
Фрилансер
3381 / 2782 / 3000
Регистрация: 08.02.2012
Сообщений: 6,712
Записей в блоге: 1
04.09.2013, 15:40 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
Var C:array[1..100] of integer;
    i,imax,n:byte;
Begin
    write('Введите n: ');readln(n);
    writeln('Исходный массив');
    For i:=1 to n do
    Begin
      C[i]:=random(31)-15;
      write(C[i]:4);
    End;
    imax:=1;
    For i:=2 to n do
     if C[i]>C[imax] then imax:=i;
    writeln;
    writeln('Max = ',C[imax]);
    if imax=n then C[n]:=0
    else
    Begin
      For i:=imax to n-1 do
       C[i]:=C[i+1];
      C[n]:=0;
    End;
    writeln('Преобразованный массив');
    For i:=1 to n do
     write(C[i]:4);
    readln;
End.
1
MoreAnswers
Эксперт
37091 / 29110 / 5898
Регистрация: 17.06.2006
Сообщений: 43,301
04.09.2013, 15:40

Из первых четырех строк массива сформировать четыре новых вектора (одномерные массивы)
Здраствуйте, возникла проблемка в двумерном массиве Из первых четырех строк массива сформировать...

Найти минимальный элемент из элем массива с нечетными номерами и максимальный элемент элементов с четными
4) Одномерный массив, состоящий из n элементов, заполняется введенными с клавиатуры целыми числами....

Удалить столбец и строку содержащие максимальный элемент матрицы
Прмогите решить плиз... Дана матрица А(nxm). Скорректировать эту матрицу, удалив из нее строку и...


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

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

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