Форум программистов, компьютерный форум, киберфорум
Наши страницы
Turbo Pascal
Войти
Регистрация
Восстановить пароль
 
Рейтинг: Рейтинг темы: голосов - 9, средняя оценка - 5.00
Юлёна
0 / 0 / 3
Регистрация: 15.11.2010
Сообщений: 21
#1

Определить средний балл каждого студента - Turbo Pascal

25.02.2011, 16:14. Просмотров 1238. Ответов 1
Метки нет (Все метки)

проверьте пожалуйчта, в чем ошибка?
Дана матрица А имеющая 30 строк и 10 столбцов, содержащая оценки группы за 1 семестр. Определить средний балл каждого студента. Исходные данные вводить из текстового файла. Результат поместить в другой текстовый файл.
Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
uses crt;
type
mas=array[1..30,1..10] of real;
stroka=string[30];
var
a:mas;
s:array[1..10] of real;
i,j,m:integer;sr:real;
fin,fout:text;
begin
assign(fin,'ocen1.txt');
rewrite(fin);
begin
for i:=1 to 30 do
    begin
         for j:=1 to 10 do
         begin
         a[i,j]:=random(5)+1;
         write(fin,'ocen.txt');
    end;
    writeln(fin);
end;
close(fin);
reset(fin);
     for i:=1 to 30 do
     begin
     s[i]:=0;
             for j:=1 to 10 do
             s[i]:=s[i]/10;
     end;
end;
close(fin);
assign(fout,'ocen2.txt');
rewrite(fout);
close(fout);
end;
end.

http://www.cyberforum.ru/turbo-pascal/thread731600.html
0
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
Similar
Эксперт
41792 / 34177 / 6122
Регистрация: 12.04.2006
Сообщений: 57,940
25.02.2011, 16:14
Я подобрал для вас темы с готовыми решениями и ответами на вопрос Определить средний балл каждого студента (Turbo Pascal):

Подсчитать средний балл каждого студента, общий средний балл по каждому предмету
Приложение под Windows должно подсчитывать средний балл каждого студента,...

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

Найти средний балл каждого студента и общий средний балл
Известны результаты сдачи трех экзаменов десятью студентами. Найти средний...

Найти средний балл каждого студента и общий средний балл
Известны результаты сдачи трех экзаменов десятью студентами. Найти средний балл...

Записи: В группе студентов определить средний балл у каждого студента
Примечание: Из текстового файла, где в каждой строке задана информация об одном...

1
Nork
4 / 4 / 0
Регистрация: 25.08.2010
Сообщений: 58
26.02.2011, 10:19 #2
Юль, не в том разделе тему запостила....
0
MoreAnswers
Эксперт
37091 / 29110 / 5898
Регистрация: 17.06.2006
Сообщений: 43,301
26.02.2011, 10:19
Привет! Вот еще темы с решениями:

Найти и вывести средний балл каждого студента
Составить базу данных о студентах предусмотрев поля Ф.И.О. ,экзамены по...

Вычислить средний балл каждого студента за экзамены
1) Необходимо написать программу в Паскале(используя вектор), которая вычислит...

Средний балл каждого студента по каждому предмету
Пользователь последовательно вводит оценки студентов по предметам. Кол-во...

Вывести на экран фамилию и инициалы, средний балл успеваемости каждого студента.
Дан список студентов. О каждом студенте известно Ф. И. О.,группа и...


Искать еще темы с ответами

Или воспользуйтесь поиском по форуму:
2
Ответ Создать тему
Опции темы

КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin® Version 3.8.9
Copyright ©2000 - 2018, vBulletin Solutions, Inc.
Рейтинг@Mail.ru