Помогите написать программу, пожалуйста!
2. Составить алгоритм определения по результатам экзаменационной сессии группы:
- отличников в группе
- отличников-юношей и отличников-девушек
- кто в группе лучше сдал экзамены - юноши или девушки
- какой из экзаменов лучше сдали юноши, а какой - девушки
По разработанному алгоритму написать Паскаль-программу с использованием процедур и функций
Помогите, кто знает...
А структуру данных ты уже создал? Начни с этого, дальше поможем.
М | 1. Заголовок темы должен быть информативным. В противном случае тема удаляется ... |
Сам хоть что-то начни делать.
На форуме много подобных задач выложено - для ознакомления подойдут.
// примерно так описать запись
type
gruppa = record
fio:string;
ocenka1,ocenka2,ocenka,ocenka4:integer;
pol:char;
end;
// массивы типа "запись".
var
a:array[1..n] of gruppa;
begin
...
// отличников в группе
otlichniki:=0;
for i:=1 to n do
begin
if (a[i].ocenka1=5) and (a[i].ocenka2=5) and (a[i].ocenka3=5) and (a[i].ocenka3=5) then
Inc(otlichniki);
end;
...
WriteLn('Отличников в группе - ',otlichniki);
...
Извини, привычка...
ну и на
данные должны в файле храниться?
или просто вводиться пользователем?
Тебе сегодня сдавать?
Я допишу, просто сил уже нет на комментарии...
Могу выложить как есть...
Пусть как есть!!!
ну вот как-то так...
вроде работает, хотя толком не тестировала... найдешь глюк (вполне вероятно) - пиши.
простор для оптимизации там есть, сама знаю. но нет времени.
2SNAKE.PAS ( 4.78 килобайт )
Кол-во скачиваний: 823
мисс_граффити
Спасибочки огромное!!!
Тут целый курсовик для меня! Буду разбираться.
Еще раз спасибо!!!
мисс_граффити
И большое спасибо за комментарии!!!