ошибка в проге

[andrewpalkin]

Сообщение от ronny137

вот это удалено

min:=9999;
max:=-9999

препод сказала, что надо просто другие значение присвоить и все
нет. не запускал.

Ну так и ее запусти и скажи , она работает или нет ?

А вместо того , что у тебя было удалено , присваивается первый найденный четный элемент , вот в этом месте :

if (kol = 0) then
       begin
          min:=a;
          max:=a;
       end;

И если препод спросит , почему нельзя просто присвоить вначале числа , то скажи , что мы не знаем в каком промежутке будет вводить числа пользователь , нельзя давать начальное число не зная этого . Поэтому , когда вводится первое четное число , оно и будет присвоено как начальное , для последующего сравнения с другими . Если будет введено число меньше этого , то присваиваем его к минимуму , если больше , то к максимуму

[andrewpalkin]

Сообщение от ronny137

нет. не запускал.

Вот это мне нравится Помогите мне решить программу , но я ее не буду даже запускать

[ACE Valery]

andrewpalkin, странный вы Зачем же запускать программу? она ж не для того написана, чтоб ее запускать))))

[andrewpalkin]

Сообщение от ACE Valery

andrewpalkin, странный вы Зачем же запускать программу? она ж не для того написана, чтоб ее запускать))))

Ага , я тоже так подумал