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

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

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

 
 Ответить  Открыть новую тему 
> типизированные файлы прямого доступа
Arashi
сообщение 22.04.2009 18:10
Сообщение #1





Группа: Пользователи
Сообщений: 3
Пол: Женский

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


Всем привет, помогите решить задачку если не сложно rolleyes.gif
Нужно сформировать символьный файл, там переставить в конец файла его 1й компонент который есть гласной буквой и стоит между двумя согласными. В задаче запрещается использование массивов dry.gif
 Оффлайн  Профиль  PM 
 К началу страницы 
+ Ответить 
Client
сообщение 22.04.2009 20:41
Сообщение #2


Профи
****

Группа: Пользователи
Сообщений: 865
Пол: Мужской
Реальное имя: Вячеслав

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


Цитата
1й компонент который есть гласной буквой и стоит между двумя согласными
Это как?
Цитата
В задаче запрещается использование массивов
Сделай через список
 Оффлайн  Профиль  PM 
 К началу страницы 
+ Ответить 
Arashi
сообщение 22.04.2009 21:07
Сообщение #3





Группа: Пользователи
Сообщений: 3
Пол: Женский

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


Цитата(Client @ 22.04.2009 20:41) *

Это как?

не знаю 8) потому и прошу помощи)

Если кто-то шарит, будьте добры, напишите листинг программы.
 Оффлайн  Профиль  PM 
 К началу страницы 
+ Ответить 
volvo
сообщение 22.04.2009 21:37
Сообщение #4


Гость






Цитата
Сделай через список
Не надо оно здесь. Задача не на динамические структуры, а на файлы. Достаточно двух переменных типа Char, чтоб обработать файл любой длины:
const
  vowels = ['a', 'e', 'o', 'i', 'u']; { гласные буквы }
  cons = ['a' .. 'z'] - vowels; { согласные буквы }
...
  { Тут создание файла - это на самостоятельную работу }

  reset(f);
  state := 0;

  while not eof(f) do begin
    case state of
      0:
      begin
        read(f, ch);
        if ch in cons then state := 1;
      end;

      1:
      begin
        read(f, ch);
        if ch in vowels then state := 2;
      end;

      2:
      begin
        read(f, ch);
        if ch in cons then state := 3 else state := 0;
      end;

      3:
      begin
        seek(f, filepos(f) - 2);
        read(f, saved);
        while not eof(f) do begin
          read(f, ch);
          seek(f, filepos(f) - 2);
          write(f, ch);
          seek(f, filepos(f) + 1);
        end;
        seek(f, filesize(f) - 1);
        write(f, saved);
      end;
    end;
  end;
  close(f);
  if state <> 3 then writeln('not found')
  else { просмотр файла - результата } ;



Добавлено через 2 мин.
Цитата
не знаю 8) потому и прошу помощи)
То есть, у тебя проблема с пониманием задачи? Ну, вот пример: start, здесь a - первая гласная, которая стоит между двумя согласными, ее надо перенести в конец файла, чтобы получилось strta ... Теперь понятнее?
 К началу страницы 
+ Ответить 
Arashi
сообщение 22.04.2009 22:17
Сообщение #5





Группа: Пользователи
Сообщений: 3
Пол: Женский

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


ух ты, спасибо большое, в тексте разобралась и задание поняла good.gif
 Оффлайн  Профиль  PM 
 К началу страницы 
+ Ответить 

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

 

- Текстовая версия 23.07.2025 0:30
Хостинг предоставлен компанией "Веб Сервис Центр" при поддержке компании "ДокЛаб"