Форум программистов, компьютерный форум, киберфорум
Pascal ABC
Войти
Регистрация
Восстановить пароль
Блоги Сообщество Поиск Заказать работу  
 
0 / 0 / 0
Регистрация: 31.01.2019
Сообщений: 1

Перенос значений переменных одной процедуры в другую

31.01.2019, 23:01. Показов 1234. Ответов 0

Студворк — интернет-сервис помощи студентам
Условия задачи предельно просты: есть некий массив а, в котором n элементов и над которым проводится m операций. При вводе числа '1' p-тый элемент массива заменяется числом v, при вводе числа '2' p-тый элемент массива выводится в файл. Проблема в том, что код основной программы задан в условии и менять его запрещено.Редактировать разрешается только три подпрограммы:
  • upd - замена элемента массива.
  • ask - вывод элемента в файл.
  • init - процедура в которую записывается число элементов массива и сам массив.
Сам исходный код с тремя пустыми процедурами:
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
39
40
41
42
43
44
45
46
47
48
49
50
procedure upd(p, v: longint);
begin
    
end;
 
function ask(p: longint): longint;
begin
    
end;
 
procedure init(n: longint; g: array of longint);
begin
    
end;
 
 
begin
    
    assign(input,'questions.in');
    reset(input);
    assign(output,'questions.out');
    rewrite(output);
    
    read(n,m);
    
    setlength(a, n);
    
    for i := 0 to n - 1 do
    begin
        read(a[i]);
    end;
    
    init(n, a);
    
    for i := 1 to m do
    begin
        read(t, p);
        if t = 1 then
        begin
            read(v);
            upd(p, v);
        end else
        begin
            writeln(ask(p));
        end;
    end;
    
    close(input);
    close(output);
end.
Сам массив среди вводимых переменных подпрограмм не используется, откуда следует, что его значения нужно вводить в подпрограммы с помощью процедуры init. Остается вопрос: как это сделать?

Буду крайне признателен за любую оказанную помощь.
0
cpp_developer
Эксперт
20123 / 5690 / 1417
Регистрация: 09.04.2010
Сообщений: 22,546
Блог
31.01.2019, 23:01
Ответы с готовыми решениями:

Перенос значений из одной строки в другую
Есть ли функция в экселе для выбора определенных значений из одной строчки в другую? Например у меня есть 200 строк, в 30 из них значение...

Перенос значений из одной таблицы в другую
Есть 2 таблицы со значениями. В таблице 2, имеются 2 столбца ID_DEPARTAMENT и NAME. В таблице 1, Больше столбцов, но тоже имеется...

Перенос значений из одной таблицы в другую
Здравствуйте. мне нужно сделать перенос значений из одной таблицы в другую. я пишу такой запросinsert into move(p_num) values ( (select...

0
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
raxper
Эксперт
30234 / 6612 / 1498
Регистрация: 28.12.2010
Сообщений: 21,154
Блог
31.01.2019, 23:01
Помогаю со студенческими работами здесь

Передача значений переменных с одной формы на другую
В проэкте две формы: внутри одной ведутся расчеты по заданным параметрам, по завершению должна появится другая форма, на которой будут...

Передача значений переменных из одной формы в другую
Извините, но я недавно начал осваивать Builder 5. Неодходимо передать значения 4-х переменный разного типа (char*, int, AnsiString) из...

Перенос значений из одной ячейки в другую по условию
Добрый день. Ситуация такая: есть таблица в один столбец, в котором стоят текстовые значения. Выглядит он так: ООО Ромашка ...

Перенос значений переменной из одной формы в другую
Приветствую ребят! Наверное это самые достаючий вопрос, так как ответов по данной теме много, особенно на данном форуме. Но то ли я...

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


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

Или воспользуйтесь поиском по форуму:
1
Ответ Создать тему
Новые блоги и статьи
Знаешь почему 90% людей редко бывают счастливыми?
kumehtar 14.04.2026
Потому что они ждут. Ждут выходных, ждут отпуска, ждут удачного момента. . . а удачный момент так и не приходит.
Фиксация колонок в отчете СКД
Maks 14.04.2026
Фиксация колонок в СКД отчета типа Таблица. Задача: зафиксировать три левых колонки в отчете. Процедура ПриКомпоновкеРезультата(ДокументРезультат, ДанныеРасшифровки, СтандартнаяОбработка) / / . . .
Настройки VS Code
Loafer 13.04.2026
{ "cmake. configureOnOpen": false, "diffEditor. ignoreTrimWhitespace": true, "editor. guides. bracketPairs": "active", "extensions. ignoreRecommendations": true, . . .
Оптимизация кода на разграничение прав доступа к элементам формы
Maks 13.04.2026
Алгоритм из решения ниже реализован на нетиповом документе, разработанного в конфигурации КА2. Задачи, как таковой, поставлено не было, проделанное ниже исключительно моя инициатива. Было так:. . .
Контроль заполнения и очистка дат в зависимости от значения перечислений
Maks 12.04.2026
Алгоритм из решения ниже реализован на примере нетипового документа "ПланированиеПерсонала", разработанного в конфигурации КА2. Задача: реализовать контроль корректности заполнения дат назначения. . .
Архитектура слоя интернета для сервера-слоя.
Hrethgir 11.04.2026
В продолжение https:/ / www. cyberforum. ru/ blogs/ 223907/ 10860. html Знаешь что я подумал? Раз мы все источники пишем в голове ветки, то ничего не мешает добавить в голову такой источник, который сам. . .
Подстановка значения реквизита справочника в табличную часть документа
Maks 10.04.2026
Алгоритм из решения ниже реализован на примере нетипового документа "ПланированиеПерсонала", разработанного в конфигурации КА2. Задача: при выборе сотрудника (справочник Сотрудники) в ТЧ документа. . .
Очистка реквизитов документа при копировании
Maks 09.04.2026
Алгоритм из решения ниже применим как для типовых, так и для нетиповых документов на самых различных конфигурациях. Задача: при копировании документа очищать определенные реквизиты и табличную. . .
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2026, CyberForum.ru