Составить программу которая организует вввод в массив записей следующих данных об учащихся: имя, фамилия, возраст, школа, класс из файла INPUT.DAT (не больше 10 человек)

1С не программила но видела что код на русском потому думаю что идентефикаторы там тоже лучше писать на руском

я просто не понимаю почему вы за покароче да как нибудь лишь бы я понял что я имел ввиду под именем этой переменной

Потому что считаю несусветной глупостью тратить время на длинные идентификаторы, понятные только англоязычным пользователям.

тогда все писать на русском только в транслите. должен же быть единый стиль именования переменных

вот хорошая статья на тему http://www.cyberforum.ru/blogs/78200/blog2500-page2.html

type  sc=record    name:string;    fam:string;    age:byte;    school:integer;    clas:string  end;var  i,n:integer;  a:array[1..10] of sc;  f:Text;begin  Writeln('Читаем данные из файла input.txt');  Assign(f,'input.txt'); Reset(f);  n:=0;  while (not Eof(f)) and (n<10) do begin    Inc(n);    Readln(f,a[n].fam); Readln(f,a[n].name);    Readln(f,a[n].age); Readln(f,a[n].school);    Readln(f,a[n].clas)  end;  Close(f);  Writeln('Принято записей: ',n);  Writeln('Контрольный вывод');  for i:=1 to n do  begin    Writeln('Школьник ',i,':');    Write(a[i].name,' ',a[i].fam,', ');    Write(a[i].age,' лет, школа №',a[i].school);    Writeln(', класс ',a[i].clas)  endend.Тестовое решение:Читаем данные из файла input.txtПринято записей: 3Контрольный выводШкольник 1:Иванов Иван, 14 лет, школа №126, класс 7бШкольник 2:Петров Петр, 13 лет, школа №18, класс 6аШкольник 3:Семенова Валентина, 15 лет, школа №52, класс 8гФайл input.txt для тестового решения находится во вложении.