Процедура Опции

[Client]

имеется программа, надо определить что будет напечатано.

Uses crt;
var
    a,b,c,d:integer;
procedure P(var b:integer; c:integer);
var d:integer;
begin
       a:=5;
       b:=6;
       c:=7;
       d:=8;
       writeln(a,b,c,d)
end;
begin
        a:=1;
        b:=2;
        c:=3;
        d:=4;
        P(a,b);
        writeln(a,b,c,d);
        readkey
end.

Ответ такой:
6678
6234
не могу понять почему 6678 и 6234, насчет 234 как-то вроде понятно, а вто 66 и 6 никак
и какие переменные здесь формальные, а какие параметры?

[Client]

Правда, можно создать указатель

а это как?
А еще препод сегодня сказал, что надо стараться использовать параметры-перменные(из-за экономии памяти и времени)
Насколько правильно это?

Сообщение отредактировано: Client - 4.12.2007 21:11

[Lapp]

а это как?

Вообще-то, лучше делать так, как написал volvo. И если ты еще не знаешь, что такое указатель (pointer), то рекомендую обратиться к какому-нить учебнику. Вряд ли стоит здесь приводить пролные сведения об этом. Кратко же, примерно так:

var
  a: integer;
  pa: ^integer

procedure P(a:integer);
begin
  WriteLn(pa^);
end;

begin
  pa:= Addr(a);
  a:=0;
  P(1)
end;

Повторяю: лучше делать способом volvo. Но если уж все же хочется извращаться, то все равно способ TarasbBer несколько неуклюж, а также требует лишней памяти и времени. И если уж все-таки хочется извращаться, то лучше через absolute:

var
  a: integer;
  b: integer absolute a;

procedure P(a: integer);
begin
  WriteLn(a);
  WriteLn(b);
end;

begin
  a := 10;
  P(50);
end.

А еще препод сегодня сказал, что надо стараться использовать параметры-перменные(из-за экономии памяти и времени)
Насколько правильно это?

Думаю, речь идет о передаче параметров "по адресу" (var).
Очень ограниченно правильно.
Передача параметров "по значению" - это одно из основных преимуществ Паскаля. Я помню, как я мучился в начале своей программерской деятельности, пытаясь найти ошибку в программе на Фортране. Убил несколько дней (тогда персоналок не было, я работал на большой машине и мог запустить прогу всего несколько раз в день), но нашел. Оказалось, что я вызываю процедуру с параметром 1, а в процедуре изменяю этот параметр. На результаты процедуры это не влияло, но из-за этого портилась сама единица! И когда я потом присваивал какой-нить переменной единицу, ей присваивалось нечто другое.. ))

Передача параметров "по значению" гарантирует их сохранность в вызывающей процедуре. Так что эту переменную в некоторых случаях можно использовать для хранения промежуточных значений - что тоже может сэкономить память. Очень рекомендую пользоваться этим преимуществом хотя бы на этапе отладки и для переменных, не требующих большой памяти. Если уж так важно время и так жестки требования к памяти, то после отладки можно поменять способ передачи - но не забыть ОБЯЗАТЕЛЬНО ПРОВЕРИТЬ программу снова как следует!

В некоторых случаях, когда параметр сам по себе требует много памяти (типа массив в килобайты), волей-неволей приходиться использовать вызов "по адресу", так как в противном случае просто не хватит памяти, а также исполнение резко замедлится. Это лишний раз говорит о том, что к программированию нужно подходить творчески. Я думаю, ваш учитель имел в виду именно случай больших по объему переменных.