profile="http://gmpg.org/xfn/11"> Π’Ρ‹Π²ΠΎΠ΄ массива Π² паскалС (Pascal). | Π Π°Π·Ρ€Π°Π±ΠΎΡ‚Ρ‡ΠΈΠΊΡƒ ΠΎ Ρ€Π°Π±ΠΎΡ‚Π΅ с 1Π‘:ΠŸΡ€Π΅Π΄ΠΏΡ€ΠΈΡΡ‚ΠΈΠ΅, Pascal, Паскаль

Π’Ρ‹Π²ΠΎΠ΄ массива Π² паскалС (Pascal).

Π’Ρ‹Π²ΠΎΠ΄ массива Π² паскалС (Pascal).
Π’ массивС доступ ΠΊ ΠΊΠ°ΠΆΠ΄ΠΎΠΌΡƒ элСмСнту массива осущСствляСтся Ρ‡Π΅Ρ€Π΅Π· индСкс. Он называСтся индСкс массива. Рассмотрим Π²Ρ‹Π²ΠΎΠ΄ массива Π² ПаскалС:

program Mas_Vyv_Task;
  //Π²Ρ‹Π²ΠΎΠ΄ массива паскаль
const
  n = 10;
var
  i: word;
  // Π·Π°Π΄Π°Π΅ΠΌ Ρ€Π°Π·ΠΌΠ΅Ρ€Π½ΠΎΡΡ‚ΡŒ массива. ИндСкс массива 1 ΠΏΠΎ 10
  i_MasNum: array[1..n] of integer;

begin
  //заполяСм массив
  i_MasNum[1] := 4;
  i_MasNum[2] := 107;
  i_MasNum[3] := -65;
  i_MasNum[4] := 3;
  i_MasNum[5] := 108;
  i_MasNum[6] := 4;
  i_MasNum[7] := 16;
  i_MasNum[8] := 19;
  i_MasNum[9] := 37;
  i_MasNum[10] := 1;
  for i := 1 to n do // i индСкс массива
    Writeln('ИндСкс: ', i, ' Π·Π½Π°Ρ‡Π΅Π½ΠΈΠ΅ ', i_MasNum[i]);

  //Π·Π°Π²Π΅Ρ€ΡˆΠ΅Π½ΠΈΠ΅ Ρ€Π°Π±ΠΎΡ‚Ρ‹ ΠΏΡ€ΠΎΠ³Ρ€Π°ΠΌΠΌΡ‹
  WriteLn('НаТмитС <Enter>, Ρ‡Ρ‚ΠΎΠ±Ρ‹ Π²Ρ‹ΠΉΡ‚ΠΈ.');
  ReadLn();
end.

Π Π΅Π·ΡƒΠ»ΡŒΡ‚Π°Ρ‚:
Π’Ρ‹Π²ΠΎΠ΄ массива паскаль
Π’Ρ‹Π²ΠΎΠ΄ массива, паскаль.

ΠšΠΎΠΌΠΌΠ΅Π½Ρ‚Π°Ρ€ΠΈΠΈ Π·Π°ΠΏΡ€Π΅Ρ‰Π΅Π½Ρ‹.