Регистрация
DesertTwo1
11.07.2021 11:22
Информатика
Есть ответ 👍

Объясните зачем в процедуре (pascal) указывается var в формальных параметров. вообще зачем он. если убрать что произойдёт. и ещё вопрос. это кусочек с программы var a, d: integer a: mas далее идёт процедура procedure (a, d: integer; var a: mas). вопрос если убрать var у а: mas то будут нули, почему? ​

121
449
Посмотреть ответы 1

Ответы на вопрос:

Qwerfcsfvfw
Qwerfcsfvfw
4,5(18 оценок)

готово

Объяснение:

program max;

var

 n, i, k: integer;

 mas: array of integer;

begin

 Write('Введите количество элементов: ');

 ReadLn(n);

 SetLength(mas, n);

 WriteLn('Введите числа: ');

 for i := 0 to n - 1 do

 begin

   Write(i + 1, ' число: ');

   ReadLn(mas[i]);

   if (i > 0) then

     if (mas[i] > mas[i - 1]) then k := k + 1;

 end;

 WriteLn('Количество элементов, больших предыдущего равно ', k);

end.

Популярно: Информатика