VPF::Странная тема с массивами - Форум программистов

FlaGmaN

Дата 21.3.2008, 14:08 (ссылка)

(нет голосов)

Загрузка ...

Новичок

Профиль
Группа: Участник
Сообщений: 46
Регистрация: 2.9.2006
Где: Москва

Репутация: нет
Всего: нет

Уважаемые программисты. Почемуто стандартная рабоат с массивами невозможна. подскажите в чем ошибка.

вот к примеру

program Project1;

{$APPTYPE CONSOLE}

uses
  SysUtils;
       type m = array [1..3] of integer;
       var
        i:integer;
begin
  { TODO -oUser -cConsole Main : Insert code here }
  for i:=1 to 3 do
  readln (m[|i]);
end.

error '(' expected but '[' found - синей палкой я показал то, куда он ставит курсор

Это сообщение отредактировал(а) FlaGmaN - 21.3.2008, 14:10

Rrader

Дата 21.3.2008, 14:18 (ссылка)

(нет голосов)

Загрузка ...

Inspired =)

Профиль
Группа: Экс. модератор
Сообщений: 1535
Регистрация: 7.5.2005

Репутация: 18
Всего: 191

Код


Program Project1;

{$APPTYPE CONSOLE}

Type
  TMyArray = Array [1..3] Of Integer;

Var
  I: Integer;
  M: TMyArray;

Begin
  For I := 1 To 3 Do
    ReadLn(M[I]);
End.

Ошибка в том, что вы пытались работать с типом данных как с переменной.

--------------------

Let's do this quickly!
Rest in peace, Vit!

Rennigth

Дата 21.3.2008, 14:20 (ссылка)

(нет голосов)

Загрузка ...

Эксперт

Профиль
Группа: Участник Клуба
Сообщений: 1708
Регистрация: 21.6.2004
Где: Moscow

Репутация: 15
Всего: 76

FlaGmaN,

Цитата(FlaGmaN @ 21.3.2008, 14:08

)

type m = array [1..3] of integer;

это ты только тип объявил.

Код


program Project1;

{$APPTYPE CONSOLE}

uses
  SysUtils;

type 
  Tm = array [1..3] of integer;
var
   i: integer;
   m: Tm;
begin
  m[1] := 1;
  m[2] := 2;
  m[3] := 3;

  for i:=1 to 3 do
    readln (m[|i]);
end.

--------------------

(* Honesta mors turpi vita potior *)

FlaGmaN

Дата 21.3.2008, 14:26 (ссылка)

(нет голосов)

Загрузка ...

Новичок

Профиль
Группа: Участник
Сообщений: 46
Регистрация: 2.9.2006
Где: Москва

Репутация: нет
Всего: нет

Точно! спасибо вам большое. Совсем мозги на работе плывут. Сам ржу над собой, немогу!!!!!!

Спасибо еще раз

1 Пользователей читают эту тему (1 Гостей и 0 Скрытых Пользователей)
0 Пользователей:
« Предыдущая тема \| Delphi: Для новичков \| Следующая тема »