Форум программистов, компьютерный форум, киберфорум
Наши страницы
Pascal (Паскаль)
Войти
Регистрация
Восстановить пароль
 
Klaud
0 / 0 / 0
Регистрация: 22.09.2009
Сообщений: 9
#1

Оброботка записей в Паскале

22.10.2009, 18:27. Просмотров 436. Ответов 3
Метки нет (Все метки)

В журнале студенческой группы ежедневно на каждом занятии напротив фамили студентов делаютса следующие пометки:
0 - отсуцтвие без уважительной причины
1 - отсуцтвие по уважительной причине
2,3,4,5 - одна из оценок
9 - присуцтвие на занятиях
Составить программу определения числа пропусков по неуважительной причине. Считать что в группе из 5 человек ежедневно проводитса по 3 занятия. Журнальная ведомость содержит информацию за неделю.

(P.S. последняя задача которая на завтро нужна - очень прошу зделайте)

Заказываю контрольные, курсовые, дипломные и любые другие студенческие работы здесь.

0
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
Similar
Эксперт
41792 / 34177 / 6122
Регистрация: 12.04.2006
Сообщений: 57,940
22.10.2009, 18:27
Ответы с готовыми решениями:

Нужно переделать программку из "записей" в "варианты записей"
Помогите пожалуйста..сделать по теме "варианты записи" 1)Багаж пассажира...

Как работает join и split в Паскале? И есть ли такие аналоги Питону в Паскале?
a=input() #из ' Hello world ' делаю 'Hello, world' a.strip(' ') a=',...

Массив записей+файл записей
Описать, используя структуру данных запись, записную книжку (фамилия, номер...

Создать двоичное дерево записей. Проверить выбранное поле записей на равенство
Создать двоичное дерево записей. Проверить выбранное поле записей на равенство....

Массив записей + Файл записей
Пусть дан массив, который содержит сведения о продаваемых квартирах. Сведения...

3
Klaud
0 / 0 / 0
Регистрация: 22.09.2009
Сообщений: 9
23.10.2009, 09:40  [ТС] #2
Help me please
0
Dnnn
1062 / 129 / 34
Регистрация: 09.10.2009
Сообщений: 271
23.10.2009, 10:07 #3
написали бы хоть - в чем этот журнал должен храниться в программе? - файл типизированный, массив записей...? какие наброски у Вас есть?
в одной записи что хранится - дата, фио, предмет, пометка?
или есть запись - фио студента и к нему массив с отметками за неделю (3 занятия на 6 дней = 18 отметок)? как считать пропуски - тупо кол-во "0" в отметках (сколько вообще всеми пар пропущено за неделю) или по каждому студенту отдельно или еще как?
0
unick12345
1345 / 1036 / 152
Регистрация: 27.03.2009
Сообщений: 3,869
23.10.2009, 10:38 #4
ну вот типа самое простое
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
38
39
40
41
program test;
uses crt;
const d=5;z=3;s=5
var uch:record
c:integer;
f:string;
end;
i,j,k,s1,s2,s3,s4,s5:integer;
begin
s1:=0;s2:=0;s3:=0;s4:=0;s5:=0;
for k:=1 to d do
begin
clrscr;
writeln('vvedite dannie za deni ',k);
for i:=1 to z do
begin
writeln('vvedite dannie po zaneatiu ',i);
for j:=1 to s do
begin
write('vvedite fam studenta ',j,' ');readln(uch.f);
write('vvedite priznak ');readln(uch.c);
if uch.c=0 then
case j of
5: s5:=s5+1;
1: s1:=s1+1;
2: s2:=s2+1;
3: s3:=s3+1;
4: s4:=s4+1;
end;
end;
writeln
end;
writeln;
end;
writeln('student 1 otsutstvoval ',s1);
writeln('student 2 otsutstvoval ',s2);
writeln('student 3 otsutstvoval ',s3);
writeln('student 4 otsutstvoval ',s4);
writeln('student 5 otsutstvoval ',s5);
readln;
end.
1
MoreAnswers
Эксперт
37091 / 29110 / 5898
Регистрация: 17.06.2006
Сообщений: 43,301
23.10.2009, 10:38

Оброботка последовательности
В водиться n чисел. Найти количество чисел, попадающих в каждый из первых трех...

Оброботка соошений
Как оброботать сообшенине которое поступает к TrayIcon1 ? Наверное правилно...

Оброботка одномерных массивов
Дана последовательность чисел. Найти: среднеарифметическое значение, без учета...


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

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

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