Замена элементов в строках

@globalplease · Регистрация: 19.02.2019

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

Как работать с числами, стоящими за МАКСИМАЛЬНЫМ в строке массива?
Например 5 6 3 9 3 4 6. Максимальное - 9, а мне нужно следующие за ним числа 3 4 6 заменить на эту девятку, чтоб получилась новая строка 5 6 3 9 9 9 9?

Pascal    
        
            
                
                
                
                
            
        
    Скопировано
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
procedure grrr;
var
i,j:integer; 
begin
Readln(STROK);
Readln(STOLBCOV);
randomize;
for i:=1 to STROK do begin
for j:=1 to STOLBCOV do begin a[i,j]:=random(199)-99; write(a[i,j]:5); 
end;
writeln;
end;
for i:=1 to 4 do begin writeln('строка №',i);
for j:=1 to STOLBCOV do begin write(a[i, j]:5); end; 
end;

Решение , ПОЖАЛУЙСТА, по этому коду. Спасибо!

@Sun Serega · 18.03.2019, 01:17

Я вам уже ответил тут:
Максимальный элемент, присвоение
Не создавайте дубли

Код рабочий, если не понимаете и не ленитесь разобраться - я всё объясню, что спросите (но только в той теме).

А рассказывать "учитель не примет" не надо, я сам через это проходил, и если понимать программу и уметь объяснить учителю - программу принимают, всегда.

@globalplease · 18.03.2019, 01:32 **[ТС]**

Я не спорю, ВАШ код рабочий, но мне нужно именно под МОЙ код сделать ее. Для меня - это целая проблема, а для вас , Сергей, как для профи. это одна минута. И почему Вы всегда ссылаетесь на то, чтоб пользователь, задающий вопрос, разбирался и понимал , что ему надо сделать? Лично я пришел на эту площадку, чтоб мне РЕШИЛИ задачу, а не направляли читать учебные пособия или что-то подобное.

@Sun Serega · 18.03.2019, 01:37

Сообщение от globalplease

Лично я пришел на эту площадку, чтоб мне РЕШИЛИ задачу, а не направляли читать учебные пособия или что-то подобное.

И я её вам решил. Зачем вам теперь другое решение? Обычно, тем кто приходит за решением - сойдёт любое, а тем кто хочет научится - разобраться не сложно.

И - переделывать код стиля 80-х годов, заставляя его работать это сложнее чем написать нормальную программу с нуля.

Новые блоги и статьи Все статьи Все блоги /
Архитектурные паттерны микросервисов: ТОП-10 шаблонов ArchitectMsa 22.03.2025 Популярность микросервисной архитектуры объясняется множеством важных преимуществ. К примеру, она позволяет командам разработчиков работать независимо друг от друга, используя различные технологии и. . .	Оптимизация рендеринга в Unity: Сортировка миллиона спрайтов GameUnited 22.03.2025 Помните, когда наличие сотни спрайтов в игре приводило к существенному падению производительности? Время таких ограничений уходит в прошлое. Сегодня геймдев сталкивается с задачами совершенно иного. . .	Образование и практика Igor3D 21.03.2025 Добрый день А вот каково качество/ эффективность ВУЗовского образования? Аналитическая геометрия изучается в первом семестре и считается довольно легким курсом, что вполне справедливо. Ну хорошо,. . .	Lazarus. Таблица с объединением ячеек. Massaraksh7 21.03.2025 Понадобилась представление на экране таблицы с объединёнными ячейками. И не одной, а штук триста, и все разные. На Delphi я использовал для этих целей TStringGrid, и то, кривовато получалось. А в. . .	Async/await в Swift: Асинхронное программирование в iOS mobDevWorks 20.03.2025 Асинхронное программирование долго было одной из самых сложных задач для разработчиков iOS. В течение многих лет мы сражались с замыканиями, диспетчеризацией очередей и обратными вызовами, чтобы. . .
Колмогоровская сложность: Приёмы упрощения кода ArchitectMsa 20.03.2025 Наверное, каждый программист хотя бы раз сталкивался с кодом, который напоминает запутанный лабиринт — чем дальше в него погружаешься, тем сложнее найти выход. И когда мы говорим о сложности кода, мы. . .	PostgreSQL в Kubernetes: Подготовка кластера и настройка Mr. Docker 20.03.2025 Когда доходит до контейнеризации баз данных и особенно таких требовательных к ресурсам системах как PostgreSQL, многие команды до сих пор колеблются, прежде чем перенести их в контейнерную. . .	C++26: Индексирование пакетов и метапрограммирование bytestream 20.03.2025 Эволюция C++ продолжается стремительными темпами – каждый новый стандарт приносит функциональность, о которой мы мечтали годами. Звучит слишком громко? Если вы когда-либо боролись с вариадическими. . .	Состояние гонки в C#: подводные камни многопоточного программирования UnmanagedCoder 20.03.2025 Что такое состояние гонки? Это ситуация, когда результат программы непредсказуемо меняется в зависимости от порядка выполнения потоков. Проще говоря, два или более потока пытаются одновременно. . .	Next.js для разработки React: преимущества серверного рендеринга Reangularity 20.03.2025 Next. js решает классическую проблему React-приложений: медленную первоначальную загрузку и плохую индексацию поисковиками. Вместо того чтобы заставлять браузер пользователя выполнять всю работу по. . .

@Sun Serega 2351 / 1454 / 526 Регистрация: 07.04.2017 Сообщений: 4,795
	18.03.2019, 01:17
	Я вам уже ответил тут: Максимальный элемент, присвоение Не создавайте дубли Код рабочий, если не понимаете и не ленитесь разобраться - я всё объясню, что спросите (но только в той теме). А рассказывать "учитель не примет" не надо, я сам через это проходил, и если понимать программу и уметь объяснить учителю - программу принимают, всегда. 0

@globalplease 0 / 0 / 0 Регистрация: 19.02.2019 Сообщений: 39
	18.03.2019, 01:32 [ТС]
	Я не спорю, ВАШ код рабочий, но мне нужно именно под МОЙ код сделать ее. Для меня - это целая проблема, а для вас , Сергей, как для профи. это одна минута. И почему Вы всегда ссылаетесь на то, чтоб пользователь, задающий вопрос, разбирался и понимал , что ему надо сделать? Лично я пришел на эту площадку, чтоб мне РЕШИЛИ задачу, а не направляли читать учебные пособия или что-то подобное. 0

@Sun Serega 2351 / 1454 / 526 Регистрация: 07.04.2017 Сообщений: 4,795
	18.03.2019, 01:37
	Сообщение от globalplease Лично я пришел на эту площадку, чтоб мне РЕШИЛИ задачу, а не направляли читать учебные пособия или что-то подобное. И я её вам решил. Зачем вам теперь другое решение? Обычно, тем кто приходит за решением - сойдёт любое, а тем кто хочет научится - разобраться не сложно. И - переделывать код стиля 80-х годов, заставляя его работать это сложнее чем написать нормальную программу с нуля. 0