Нельзя преобразовать тип array [1..10] of integer к array [1..10] of integer

@kbprod · Регистрация: 15.01.2015

Author24 — интернет-сервис помощи студентам

Ошибка в 23 строке

(23) : Нельзя преобразовать тип array [1..10] of integer к array [1..10] of integer

Pascal

program pr412;
uses crt;
type mas= array[1..10]  of integer;
procedure p(b:mas;var d:integer);
var i:integer;
begin
d:=0;
 for i:=1 to 10 do
 if b[i] <b[10] then begin
      d:=b[i]; break  end;
 end;                          {конец процедуры}
var i,c:integer;
 a:array[1..10]  of integer;
   begin
clrscr;
randomize;
writeln('Исходный массив A:');
for i:=1 to 10 do  begin
a[i]:=random(20)+1;
write( a[i],' ');  end;
writeln;
writeln('Результат выполнения программы:');
  p(a,c);
   writeln(c);
   writeln('конец задачи');
//readln;
end.

@Puporev · 18.01.2015, 11:29

Строка 13

Pascal

 a:mas;

@kbprod · 18.01.2015, 12:41 **[ТС]**

Спасибо, уже сам нашел)

@kbprod 0 / 0 / 0 Регистрация: 15.01.2015 Сообщений: 3
	18.01.2015, 12:41 [ТС]	3
	Спасибо, уже сам нашел) 0

Опции темы