Создать список учеников, указав их фамилию, имя и оценки по трем предметам

@Милаше · Регистрация: 13.04.2012

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

Создать список учеников, указав их фамилию, имя и оценки по трем предметам (русский, математика, физика), определить средний балл каждого ученика и количество отличников.
Предусмотреть в программе запись списка в файл и чтение из файла, редактирование списка и вывод в виде таблицы.
Есть вот такая программа. Помогите, пожалуйста, с "Предусмотреть в программе запись списка в файл и чтение из файла, редактирование списка и вывод в виде таблицы."

Pascal

Type jurnal = record
 n : integer ;
fio : string[20] ;
bal : array [1..3] of integer
end;
Var spisok : jurnal ;
i, j, cantitatea, s : integer; sr : real;
Begin
 
cantitatea:=0;
With spisok do
For i:=1 to 3 do
begin
n:=i;
Write (' Vvedite FIO # ', i ,' ');
Readln (fio);
s:=0;
For j:= 1 to 3 do
begin
writeln ( 'Vvesti ocenky: ' );
readln ( bal [j] );
s := s+ bal [j];
end;
 if s=15
  then cantitatea:=cantitatea+1;
  sr := s/3; writeln ( fio, ', Sr bal = ', sr:4:1); end;
  writeln ( ' Kol otlichnikov = ', cantitatea );
end.

@Милаше · 15.05.2012, 19:05 **[ТС]**

Создать список учеников, указав их фамилию, имя и оценки по трем предметам (русский, математика, физика), определить средний балл каждого ученика и количество отличников.
Предусмотреть в программе запись списка в файл и чтение из файла, редактирование списка и вывод в виде таблицы. Использовать записи!

@КонецСвета · 15.05.2012, 19:10

Комментарий модератора

Милаше, пора уже познакомиться с правилами форума.
В частности, что касается осмысленных заголовков тем.
И, кроме того, дублирования тем.
Поднимайте старые темы сообщением "Актуально".
Выкладывайте свои наработки. И прочитайте, наконец, правила!

@Милаше · 17.05.2012, 18:33 **[ТС]**

Создать список учеников, указав их фамилию, имя и оценки по трем предметам (русский, математика, физика), определить средний балл каждого ученика и количество отличников.
Предусмотреть в программе запись списка в файл и чтение из файла, редактирование списка и вывод в виде таблицы. Использовать записи!

@Милаше 0 / 0 / 0 Регистрация: 13.04.2012 Сообщений: 78
	15.05.2012, 19:05 [ТС]	2
	Создать список учеников, указав их фамилию, имя и оценки по трем предметам (русский, математика, физика), определить средний балл каждого ученика и количество отличников. Предусмотреть в программе запись списка в файл и чтение из файла, редактирование списка и вывод в виде таблицы. Использовать записи! 0

@Милаше 0 / 0 / 0 Регистрация: 13.04.2012 Сообщений: 78
	17.05.2012, 18:33 [ТС]	4
	Создать список учеников, указав их фамилию, имя и оценки по трем предметам (русский, математика, физика), определить средний балл каждого ученика и количество отличников. Предусмотреть в программе запись списка в файл и чтение из файла, редактирование списка и вывод в виде таблицы. Использовать записи! 0

Опции темы