Задача на файлы. Дано предложение. Каждое слово оканчивающееся на 'a' переписать в творительном падеже. Результат вывести на экран

[ANTON1994]

Задача на файлы. Дано предложение. Каждое слово оканчивающееся на 'a' переписать в творительном падеже. Результат вывести на экран.( написать подпрограммой с использованием процедур ввода и вывода).

[ANTON1994]

uses crt;

const mn = [' ', ',', '.', '!', '?'];
var f: text;
  s, s1: string;
  i, n: byte;
  ch: integer;
begin
  Assign(f, 'in.txt'); Reset(f);
  s1 := ''; s := s + ' '; ch := a;
  while not eof(f) do begin
    for i := 1 to Length(s) do
      if not (s[i] in mn) then s1 := s1 + s[i]
      else
      begin
        if (s1[1] = ch) then (Length(s1) = n) then writeln(s1);
        s1 := '';
      end;
  end;

  while not Eof(g) do
  begin
    readln(f, s);
    writeln(s);
  end;
  Close(f);
  readln;
end.

нашел все слова начинающиеся на а..а с падежом надо будет помучаться ну это без подпрограм и не отлажена


_______
для оформления кода используйте тег [CODE].. [/ CODE]
(кнопка на панели форматирования # )

Модератор

[Serge_Bliznykov]

во-первых, пишите код структурно ("лесенкой") (я ваш отформатировал для пример), это резко повышает его наглядность/читаемость..

во-вторых, что значит "в творительном падеже" ?
если дано предложение, например,
Лена мазала белила на окна, когда заиграла музыка.
что должна выдать программа?

ну и не совсем понятно, какие функции должны быть вынесены в процедуры...

[ANTON1994]

вопросы творительного падежа "кем?" "чем?" , тоесть выходит что слова оканчивающиеся на "а" переписываем в творительный падеж. Леной , окнами , музыкой - изменяются только существительные .

[s-andriano]

А как алгоритмически отличить существительные от других частей речи?

[ANTON1994]

нужно будет ввести только существительные в файле изначально

[Аватар]

Лена, окна - Леной, окнами - по какому алгоритму различать?

[s-andriano]

Сообщение от ANTON1994

нужно будет ввести только существительные в файле изначально

Это противоречит условию.

Дано предложение.

А в предложении, даже если оно состоит из единственного слова, как правило, есть другие части речи.

[s-andriano]

Сообщение от Аватар

Лена, окна - Леной, окнами - по какому алгоритму различать?

А кто сказал, что в предложении существительные в именительном падеже?
Стоять у окна -> Стоять у окнами?

[ANTON1994]

в общем так- нужно будет ввести в файл существительные(даже бессвязные через пробел или например запятую) и оканчивающиеся на "а" переписать в творительный падеж.