Автор Крис задал вопрос в разделе Другие языки и технологии
ПАСКАЛЬ. Составить базу данных об учащихся. Не получается сортировка. Помогите найти ошибку в коде и получил лучший ответ
Ответ от Ахметшин Марат[гуру]
для начала исправь var tv:uch; на var tv:ludi; uch=array[1..n] of ludi; var tv:uch; исправить на var tv:ludi; uch:array[1..n] of ludi; после write(\'Ocenki3: \'); readln(tv.ocen3); припесать uch индекс :=tv; далее здесь так writeln(\'FIO \':10, \'Predm 1\':10,\'Ocenki 1\':10, \'Predm 2\':10,\'Ocenki 2\':10,\'Predm 3\':10,\'Ocenki 3\':10); for i:=1 to k do begin tv:=uchиндекс; with tv do writeln(fio:10,predm1:10,ocen1:10,predm2:10,ocen2:10,predm3:10,ocen3:10); end; writeln(\'---------------Poisk po ocenkam 4/5-------------------------------\'); дальше не смотрел
MxM He 3Hal-0
обратись на ресурс киберфорум. ру юзани поиск найдёшь, там люди програмисты сидят помогут =)
что значит "не получается"? здесь же нет никакой сортировки
Если вы не понимаете, заплатите тому, кто понимает.. . А то вы дотянули по самое не балуй, а теперь срочно решение нужно...