Абстрактное обменное слияние

28.04.2019, 20:27. Показов 2233. Ответов 0

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

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

Подскажите, в чем ошибка, пожалуйста. Выводит только элементы первого массива и остальное нули.

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
Program SliyanAbstractObmen;
var i, j, n, m,k,r : integer;
A, B, C :array [1..20] of integer;
begin write ('Количество элементов массива A: '); readln(m);
      write('Mассив A: '); 
    for i:=1 to m do begin
    read(A[i]);
                     end;
    write ('Количество элементов массива B: '); readln(n);
    write('Mассив B: '); 
    for j:=1 to n do begin
    read(B[j]);
                     end;
    for i:=1 to m do begin 
                     c[i]:=a[i];
                     end;
    i:=1;
    for j:=r downto (m+1) do begin
                             c[j]:=a[r+m-j+1];
                             end;
    j:=r;
    for k:=1 to r do begin
                     if c[i]<c[j] then 
                          begin a[k]:=c[i]; 
                          i:=i+1; 
                          end
                     else begin a[k]:=c[j]; 
                          j:=j-1; 
                          end
                     end;
        write('Результат слияния: '); 
    for k:=1 to (m+n) do write(a[k],' ');
end.

IT_Exp

Эксперт

34794 / 4073 / 2104

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

Сообщений: 32,602

Блог

28.04.2019, 20:27

Ответы с готовыми решениями:

Абстрактное мышление
Всем привет.уважаемые программисты, научите пож-ста,мыслить абстрактно.не раз слышал что это очень важно.Обьясните суть и способ! Я...

Абстрактное наследование
Есть первый класс public abstract class Pair { double x,x1,x2; public abstract Object add(Pair A); public abstract Object...

Абстрактное моделирование сущности.
Концептуальна ли субстанциональность объектно-ориентированного подхода в построении n-уровневых клиент-серверных приложений?

Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.

BasicMan

Эксперт

29316 / 5623 / 2384

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

Сообщений: 30,364

Блог

28.04.2019, 20:27

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

Абстрактное наследование от AsyncTask
Нужно реализовать иерархию наследования от AsyncTask. Цель - переопределить метод. Как в Java реализуется шаблонное наследование ? ...

Абстрактное ядро ОС для микроконтроллеров.
Сколько может весить ядро операционной системы для микроконтроллеров и что оно должно содержать и уметь? Обычно, когда мы на страницах...

Что есть абстрактное множество?
Здравствуйте, Хочу спросить, может быть кто нибудь знает и сможет мне объяснить что означает следующая фраза "Реализуйте...

Класс, содержащий абстрактное поле
Здравствуйте. Хочу сделать так, чтобы класс содержал одним из своих полей интерфейс. Как лучше реализовать, чтобы извне невозможно...

Программирование подавляет абстрактное мышление!
Вы больше не сможете так восхищаться любимой музыкой! Выражение лица у вас станет очень серьёзным. Ведь недаром академик Ершов считает...

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

Или воспользуйтесь поиском по форуму:

Новые блоги и статьи Все статьи Все блоги /
Оттенки серого Argus19 18.03.2026 Оттенки серого Нашёл в интернете 3 прекрасных модуля: Модуль класса открытия диалога открытия/ сохранения файла на Win32 API; Модуль класса быстрого перекодирования цветного изображения в оттенки. . .	SDL3 для Desktop (MinGW): Рисуем цветные прямоугольники с помощью рисовальщика SDL3 на Си и C++ 8Observer8 17.03.2026 Содержание блога Финальные проекты на Си и на C++: finish-rectangles-sdl3-c. zip finish-rectangles-sdl3-cpp. zip	Символические и жёсткие ссылки в Linux. algri14 15.03.2026 Существует два типа ссылок — символические и жёсткие. Ссылка в Linux — это запись в каталоге, которая может указывать либо на inode «файла-ИСТОЧНИКА», тогда это будет «жёсткая ссылка» (hard link),. . .	[Owen Logic] Поддержание уровня воды в резервуаре количеством включённых насосов: моделирование и выбор регулятора ФедосеевПавел 14.03.2026 Поддержание уровня воды в резервуаре количеством включённых насосов: моделирование и выбор регулятора ВВЕДЕНИЕ Выполняя задание на управление насосной группой заполнения резервуара,. . .
делаю науч статью по влиянию грибов на сукцессию anaschu 13.03.2026 прикрепляю статью	SDL3 для Desktop (MinGW): Создаём пустое окно с нуля для 2D-графики на SDL3, Си и C++ 8Observer8 10.03.2026 Содержание блога Финальные проекты на Си и на C++: hello-sdl3-c. zip hello-sdl3-cpp. zip Результат:	Установка CMake и MinGW 13.1 для сборки С и C++ приложений из консоли и из Qt Creator в EXE 8Observer8 10.03.2026 Содержание блога MinGW - это коллекция инструментов для сборки приложений в EXE. CMake - это система сборки приложений. Здесь описаны базовые шаги для старта программирования с помощью CMake и. . .	Как дизайн сайта влияет на конверсию: 7 решений, которые реально повышают заявки Neotwalker 08.03.2026 Многие до сих пор воспринимают дизайн сайта как “красивую оболочку”. На практике всё иначе: дизайн напрямую влияет на то, оставит человек заявку или уйдёт через несколько секунд. Даже если у вас. . .

Наверх