Версия для печати темы

Нажмите сюда для просмотра этой темы в обычном формате

Форум «Всё о Паскале» _ Задачи _ Обработка записей

Автор: TyKuC 30.05.2006 22:17

Здравствуйте....помогите с заданием...3 задания сделал осталось 1 не как не могу понять как его сделать.. .

Даны массивы: F1..,F10 - фамилии студентов
B1..,B10 - средние баллы за семестр и задан R - стипендиальный фонд на группу.
Стипендия назначется в пределах фонда студентам со средним баллом, большим 4 Напечатать список студентов со средним баллом выше 4 и указать количество стипендий на группу.

Автор: klem4 30.05.2006 22:21

count := 0;
for i := 1 to 10 do
if b[i] > 4 then begin
writeln(a[i]);
inc(count);
end;

writeln('count = ', count);


Вот только причем тут R я не пойму ...

Автор: TyKuC 30.05.2006 22:30

Я думаю там нужно просто написать цифру сколько студентов у которых средний балл выше 4 . Это потом получится переделать в графический режим ?

Автор: klem4 30.05.2006 22:35

Я вроде привел тебе уже решение blink.gif А грифику то тут куда !?

Автор: TyKuC 30.05.2006 22:44

Это всё нужно сделать в графическом режиме((...я попробывал сделать всё как положено пока без графического режима....и всё равно не получается . Он выдаёт ошибку. Как теперь сделать что бы всё заработало ?!

Код

var
a,i,count:integer;
b: array [1..10,1..10]  of real;
begin
count := 0;
for i := 1 to 10 do
if b[i] > 4 then begin
   writeln(a[i]);
   inc(count);
writeln('count = ', count);
readln;
end.

Автор: TyKuC 30.05.2006 23:36

ЛЮДИ помогите завтра сдавать !!!! не получается не как(((

Автор: volvo 30.05.2006 23:44

Цитата
Он выдаёт ошибку
И правильно делает... Ты зачем всунул ДВУмерный массив? Где у тебя по условию нужен ДВУмерный?

А почему ошибка - потому что нельзя проверять вектор на равенство. Ни с чем... Сравнивать можно только ВСТРОЕННЫЕ типы...

Автор: TyKuC 31.05.2006 0:16

мне надо сделать что бы моя программа работала вот так:



1)Петров --- 3
2)Сидоров --- 4
3)Иванов --- 5
4)... --- 2
5)... --- 3
6)... --- 2
8)... --- 3
9)... --- 2
10)... --- 3

Фонд на группу = 100

-----------------------------------------------------------------------------------------------------------
Студенты со средним баллов выше 4:
1)Петров - 0
2)Сидоров - 100
3)Иванов - 100
4)...- 0

Количество стипендий:
2
.......получается какая то билеберда помогите если не сложно !