IPB
ЛогинПароль:

> Прочтите прежде чем задавать вопрос!

1. Заголовок темы должен быть информативным. В противном случае тема удаляется ...
2. Все тексты программ должны помещаться в теги [code=pas] ... [/code], либо быть опубликованы на нашем PasteBin в режиме вечного хранения.
3. Прежде чем задавать вопрос, см. "FAQ", если там не нашли ответа, воспользуйтесь ПОИСКОМ, возможно такую задачу уже решали!
4. Не предлагайте свои решения на других языках, кроме Паскаля (исключение - только с согласия модератора).
5. НЕ используйте форум для личного общения, все что не относится к обсуждению темы - на PM!
6. Одна тема - один вопрос (задача)
7. Проверяйте программы перед тем, как разместить их на форуме!!!
8. Спрашивайте и отвечайте четко и по существу!!!

 
 Ответить  Открыть новую тему 
> Запись, с файлом и без
сообщение
Сообщение #1


Новичок
*

Группа: Пользователи
Сообщений: 15
Пол: Женский
Реальное имя: Юлия

Репутация: -  0  +


Знаю, что было уже такое, но я все равно не понимаю, как это делать.
Посмотрела ВСЕ материалы, которые тут есть.

Сначала без файла. Вот задача. Делала по форумским задачам, ничего не получилось, взяла у одногрупницы похожую, переделала, ничего как видите не происходит. Уже месяц мучаюсь.. Объясните что там не так, у нас препод никому ничего не объясняет...

А с файлом я не понимаю как делать вообще.
мне не понятно: там (переменная,dann[i].xx,переменная2) что это? и это:

(* Имеем массив записей TBase, i-й элемент массива содержит информацию об i-ом студенте, для того чтобы получить например имя 4-го студента, надо обратиться сначала к 4-й записи, а после к нужному полю b[4].name, его оценка по 2-му предмету - b[4].maks[2]*)

(это из Записи. Record.

Как это совмещать с прогой? Надеюсь на Вашу помощь...



Сформировать запись, имеющую след. структуру:
type: спортсмен=record фамилия:string;
страна:string;
рост:150..220;
вес:30..100;
год рождения:integer;
результат:integer;
end;

и определить:
- средний рост и вес спортсменов данной страны
- найти лучшего спортсмена данной страны
- список спортсменов данного возраста с результатом, не хуже данного.


Прикрепленные файлы
Прикрепленный файл  SP5.PAS ( 2.21 килобайт ) Кол-во скачиваний: 259
 Оффлайн  Профиль  PM 
 К началу страницы 
+ Ответить 
сообщение
Сообщение #2


Гость






Смотри, что я бы изменил в программе...

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


Прикрепленные файлы
Прикрепленный файл  __sport.pas ( 2.63 килобайт ) Кол-во скачиваний: 237
 К началу страницы 
+ Ответить 
сообщение
Сообщение #3


Новичок
*

Группа: Пользователи
Сообщений: 15
Пол: Женский
Реальное имя: Юлия

Репутация: -  0  +


volvo, огромное спасибо!!! Выручил... Все прекрасно работает...

Таак, а если с файлом, то, я так понимаю, перед всеми dann[i].xxxx должна стоять f? или не везде? unsure.gif

Вот, как в примере с игрушками:

Код
begin
assign(f,'c:\data.txt');{c:\data.txt - путь к файлу с данными}
reset(f);
repeat
  n:=n+1;
  readln(f,info[i].title);
  readln(f,s);
  val(s,info[i].price,er);
  if info[i].price>maxp then maxp:=info[i].price;
  readln(f,s);
  val(s,info[i].age_1,er);
  readln(f,s);
  val(s,info[i].age_2,er);
until eof(f);
close(f);
clrscr;


эмм... тут правда не с процедурами... что делать в процедурах? я пыталась вставить val и (и или) f перед данн... ничего... чето не знаю я даж... всех этих правил... =(
и еще, что делать, чтобы меню сразу появлялось?..

Сообщение отредактировано: Lady_Dark -
 Оффлайн  Профиль  PM 
 К началу страницы 
+ Ответить 

 Ответить  Открыть новую тему 
1 чел. читают эту тему (гостей: 1, скрытых пользователей: 0)
Пользователей: 0

 





- Текстовая версия 29.03.2024 5:21
500Gb HDD, 6Gb RAM, 2 Cores, 7 EUR в месяц — такие хостинги правда бывают
Связь с администрацией: bu_gen в домене octagram.name