[lxa85]

lenaustkz84,

Код: i:=3; repeat read(c); if(c>max) then max:=c else max:=max; if(c<min) then min:=c else min:=min; i:=i+1; c:=0; until(i>N); »

подожди, а здесь то что выполняется? Почему условия выхода из цикла такие странные?
i уже равно 3, хотя цифры вводить мы и не начинали. И как правильно указал CyberDaemon, min, max, еще не определены, а мы уже сравниваем с ними вводимое число.
----
Общая реплика: lenaustkz84, молодец, старайся, думай. Такие темы приятно читать и приятно помогать.

Все что вверху, уже не в счет!

Код: begin read(a,b); if (a>b) then begin max:=a; min:=b; end else begin max:=b; min:=a; end; i:=3; repeat read(c); if(c>max) then max:=c else max:=max; if(c<min) then min:=c else min:=min; i:=i+1; c:=0; until(i>N); »

Это хорошо, только напиши еще проще. У тебя уже изначально известно, что переменных больше двух. Соотв. первый if (a>b) не понятен (как следствие не нужен).
Попробуй переписать с использованием цикла for или чуть-исправить repeat until.

спойлер, не подглядывать :)

begin
read(c);
max:=c;
min:=c;
i:=1;
repeat
i:=i+1;
read(c);
if(c>max) then max:=c;
if(c<min) then min:=c;
until(i>=N);