Developing.ru

1)Организовать текстовый файл f состоящий из N строк. После этого организовать файлы h и g. В файл h записать строки файла f занимающие нечётные позиции, в файл g чётные
2)Имеется текстовый файл. Выяснить, имеются ли в нем строки, начинающиеся с буквы «т». Если да, то определить номер первой из таких строк.

#1. Задачка совершенно простая. организуйте 3 файла тхт. Первый(главный) откройте ТОЛЬКО для чтения, а два других для перезаписи. Учитывая, что текстовый файл считывается только по-строкам (с помощью процедуры READLN(f,s), где F-файловая переменная, S-строковая переменная ), следовательно
пока не конец файла считывать в строку, не забывая увеличивать целую переменную на 1(в начале эта переменная равна 0).Далее проверяем ее на чет/нечет. если чет то зписать в G , если нечет то в H. После этого закрыть ВСЕ файлы.

#2 открывай файлы, считывайте в строку,увелич целочисленную переменную на 1 (стандартная процедура Inc(i), где i целочисленная переменная) проверяйте первый символ,если "Т", то выводите номер строки(целочисленная переменная, которую мы увеличивали перед считыванием)

И размещайте, пожалуйста,подобные темы в разделе Решите мне задачку.

mne tekst etih program togda voobche super bylo.ya probyval no 4e to ne polu4ilos

Я разместила ТЕКСТ программ. а Код попробуйте написать сами. Если Вы пытались что-то сделать, то выложите его сюда. я откорректирую. Задачи действительно элементарные. и мне нет резона тратить на простой ввод текста свое личное время.

C_O_D_E писал(а): пока не конец файла считывать в строку, не забывая увеличивать целую переменную на 1(в начале эта переменная равна 0).Далее проверяем ее на чет/нечет. если чет то зписать в G , если нечет то в H. После этого закрыть ВСЕ файлы.

Можно и попроще: считать две строки подряд, одну записать в первый файл, другую во второй

[[не забывая увеличивать целую переменную на 1(в начале эта переменная равна 0).Далее проверяем ее на чет/нечет. если чет то зписать в G , если нечет то в H.]]-4e to ne mogu ya eto sdelat hot' ubey

Покажите, что вы сделали, и возможно вам объяснят, в чем ошибка.