Как в параметрах процедуры пропустить переменную по умолчанию?

@Radmir2015 · Регистрация: 16.04.2015

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

a и b заданы по умолчанию, задав Sum(k, 8). 8 будет присвоена a, но я хочу пропустить a и присвоить восемь к b.
Как это можно сделать?
Можно как-нибудь получить значение по умолчанию из параметров функции в основной программе?

Pascal

procedure Sum(var sum: integer; a: integer := 4; b: integer := 1);
begin
  sum := a + b;
end;
 
begin
var k := 0;
Sum(k,8);
print(k);
end.

@capricornus CF · 19.03.2016, 23:42

Во первых у вас процедура, а не функция. Во вторых, имя процедуры не должно совпадать с именем параметра процедуры.И раз так хочется поменять -

Pascal

1	procedure Sum(var sum: integer; b: integer := 1; a: integer := 4);

@Radmir2015 · 20.03.2016, 00:14 **[ТС]**

capricornus CF,
1) может быть и описался, но я хотел спросить про функции и процедуры в общем.
2) они на один символ отличаются, да и ладно, все четко работает
3) я имел ввиду не решение конкретной задачи, где можно просто переставить параметры (я работаю над проектом, вот там хоть ставь, хоть переставляй, но это проблему не решит), я хотел спросить как можно переменную-параметр "a" оставить в виде "по умолчанию", а "b" переназначить. Может есть какая-то хитрость.

@volvo · 20.03.2016, 00:39

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

Может есть какая-то хитрость.

Нет такой хитрости. Для того, чтобы это стало возможно, нужно так называемое именованное сопоставление (по крайней мере в терминах ЯП Ада это называется именно так). Тогда можно сделать то, что хочется:

Код

   procedure Sum (s : out Integer; a : Integer := 4; b : Integer := 1) is
   begin
      s := a + b;
   end Sum;

-- вызов
   
   Sum (s, b => 8); // s = 4 + 8

В Паскале именованного сопоставления нет. Поэтому невозможно то, что хочется выше.

@Radmir2015 · 20.03.2016, 00:42 **[ТС]**

volvo, а на каком языке вы написали?

@volvo · 20.03.2016, 00:49

Конкретно мой код - на Аде. Но Named Arguments есть и в C#, и во многих других языках. Только вот разработчики Паскаля не подумали об их введении.

@capricornus CF · 20.03.2016, 01:01

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

2) они на один символ отличаются, да и ладно, все четко работает

Регистр не имеет значения - они одинаковы. Если бы у вас была функция - отгадайте что бы произошло?

@Radmir2015 · 20.03.2016, 01:50 **[ТС]**

capricornus CF, но у меня не функция, поэтому

Сообщение от capricornus CF

Во вторых, имя процедуры не должно совпадать с именем параметра процедуры

не верно.

@Radmir2015 6 / 6 / 9 Регистрация: 16.04.2015 Сообщений: 121
	20.03.2016, 00:14 [ТС]	3
	capricornus CF, 1) может быть и описался, но я хотел спросить про функции и процедуры в общем. 2) они на один символ отличаются, да и ладно, все четко работает 3) я имел ввиду не решение конкретной задачи, где можно просто переставить параметры (я работаю над проектом, вот там хоть ставь, хоть переставляй, но это проблему не решит), я хотел спросить как можно переменную-параметр "a" оставить в виде "по умолчанию", а "b" переназначить. Может есть какая-то хитрость. 0

@volvo Супер-модератор 32835 / 21172 / 8148 Регистрация: 22.10.2011 Сообщений: 36,431 Записей в блоге: 8
	20.03.2016, 00:39	4
	Сообщение от Radmir2015 Может есть какая-то хитрость. Нет такой хитрости. Для того, чтобы это стало возможно, нужно так называемое именованное сопоставление (по крайней мере в терминах ЯП Ада это называется именно так). Тогда можно сделать то, что хочется: Код procedure Sum (s : out Integer; a : Integer := 4; b : Integer := 1) is begin s := a + b; end Sum; -- вызов Sum (s, b => 8); // s = 4 + 8 В Паскале именованного сопоставления нет. Поэтому невозможно то, что хочется выше. 0

@Radmir2015 6 / 6 / 9 Регистрация: 16.04.2015 Сообщений: 121
	20.03.2016, 00:42 [ТС]	5
	volvo, а на каком языке вы написали? 0

@volvo Супер-модератор 32835 / 21172 / 8148 Регистрация: 22.10.2011 Сообщений: 36,431 Записей в блоге: 8
	20.03.2016, 00:49	6
	Конкретно мой код - на Аде. Но Named Arguments есть и в C#, и во многих других языках. Только вот разработчики Паскаля не подумали об их введении. 0

@capricornus CF 318 / 208 / 162 Регистрация: 08.12.2015 Сообщений: 863
	20.03.2016, 01:01	7
	Сообщение от Radmir2015 2) они на один символ отличаются, да и ладно, все четко работает Регистр не имеет значения - они одинаковы. Если бы у вас была функция - отгадайте что бы произошло? 0

@Radmir2015 6 / 6 / 9 Регистрация: 16.04.2015 Сообщений: 121
	20.03.2016, 01:50 [ТС]	8
	capricornus CF, но у меня не функция, поэтому Сообщение от capricornus CF Во вторых, имя процедуры не должно совпадать с именем параметра процедуры не верно. 0