Форум программистов
 

Восстановите пароль или Зарегистрируйтесь на форуме, о проблемах и с заказом рекламы пишите сюда - alarforum@yandex.ru, проверяйте папку спам!

Вернуться   Форум программистов > Delphi программирование > Паскаль, Turbo Pascal, PascalABC.NET
Регистрация

Восстановить пароль
Повторная активизация e-mail

Купить рекламу на форуме - 42 тыс руб за месяц

Ответ
 
Опции темы Поиск в этой теме
Старый 01.02.2020, 12:32   #1
digitalis
Старожил
 
Аватар для digitalis
 
Регистрация: 04.02.2011
Сообщений: 4,546
По умолчанию указатели годятся только для динамических массивов ?

Код:
program z1; { Array as parameter }
type ptr = ^integer ;
var i,j:integer; p : ptr ;
a:array[1..3,1..2] of integer;

procedure inp (m,n:integer; arg: ptr) ;
var ii,jj: integer ; pp : ptr ;
begin
  pp := arg ; 
  for ii := 1 to m do
    for jj := 1 to n do
      begin
        pp^ := ii*10+jj ;
        pp := pp + 1
      end ;  {<- Вот тут даёт ошибку Type mismatch}
end ;

begin
  p := @a[1,1] ;
  inp(3,2,p) ;
  for i := 1 to 3 do
    for j := 1 to 2 do
      writeln (a[i,j]) ;
end ;
 
end.
Или указатели годятся только для динамических массивов ?

Последний раз редактировалось digitalis; 01.02.2020 в 12:51.
digitalis на форуме Ответить с цитированием
Старый 01.02.2020, 15:57   #2
Pavia
Лис
Старожил
 
Аватар для Pavia
 
Регистрация: 18.09.2015
Сообщений: 2,409
По умолчанию

Цитата:
Сообщение от digitalis Посмотреть сообщение
pp := pp + 1
Арифметика указателей появилась сравнительно недавно в Delphi XE 10.3.
Так что замените на Inc(pp,1);
Хорошо поставленный вопрос это уже половина ответа. | Каков вопрос, таков ответ.
У дзен программиста программа делает то что он хотел, а не то что он написал .
Pavia вне форума Ответить с цитированием
Старый 02.02.2020, 10:31   #3
digitalis
Старожил
 
Аватар для digitalis
 
Регистрация: 04.02.2011
Сообщений: 4,546
По умолчанию

Действительно, помогло. Thanks.
digitalis на форуме Ответить с цитированием
Ответ


Купить рекламу на форуме - 42 тыс руб за месяц

Опции темы Поиск в этой теме
Поиск в этой теме:

Расширенный поиск


Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
Указатели. программирование с использованием динамических двумерных массивов alexn99 Visual C++ 3 20.05.2018 12:58
Связывание 2-ух динамических списков(указатели,pascal) Loner Помощь студентам 9 13.05.2013 15:12
Выполнить обработку массивов. предусмотреть описание массивов как динамических Vika_0_0 Паскаль, Turbo Pascal, PascalABC.NET 8 03.06.2012 10:12
Организация динамических массивов. MaSTeD C# (си шарп) 0 29.02.2012 10:18
обработка динамических массивов funky Помощь студентам 0 11.05.2009 17:53