![]() |
Здравствуйте, гость ( Вход | Регистрация )
![]() |
![]()
Сообщение
#1
|
|
![]() Супер постер ![]() ![]() ![]() ![]() ![]() Группа: Posters Сообщений: 756 Регистрация: 23.9.2006 Из: Саратов Пользователь №: 2,028 ![]() |
помогите решить задачку!
Определить минимальный элемент массива и его порядковый номер. -------------------- спасем китов, maza f*cka! %)
|
|
|
![]() |
Гость_-=Alex=-_* |
![]()
Сообщение
#2
|
Guests ![]() |
народ, помощь нужна...
Если кому не трудно напишете пожалуйста прогу: есть входной файл с текстом(несколько строк), надо чтобы прога удаляла из каждой строки последовательность символов, ограниченных с обеих сторон заданным символом. Заранее благодарен. |
|
|
Гость_redHunter_* |
![]()
Сообщение
#3
|
Guests ![]() |
народ, помощь нужна... Если кому не трудно напишете пожалуйста прогу: есть входной файл с текстом(несколько строк), надо чтобы прога удаляла из каждой строки последовательность символов, ограниченных с обеих сторон заданным символом. Заранее благодарен. program forU; var finp,fout:text; nameI,nameO:string; bor:char; simb:char; yes:boolean; begin write('name input file?');readln(nameI); write('name output file?');readln(nameO); write('border simbol?');readln(bor); assign(finp,nameI);assign(fout,nameO); reset(finp); rewrite(fout); yes:= true; repeat read(finp,simb); if simb=bor then yes:=not yes else begin if yes then write(fout,simb); end; until eof(finp); close(finp);close(fout); end. Тут 2 файла: исходный и результат, название сам введешь, когда прогу запустишь. Символ тоже! До запуска создай исходный файл с текстом. Лучше блокнотом! народ, помощь нужна... Если кому не трудно напишете пожалуйста прогу: есть входной файл с текстом(несколько строк), надо чтобы прога удаляла из каждой строки последовательность символов, ограниченных с обеих сторон заданным символом. Заранее благодарен. Проверил, у меня работает ![]() ![]() |
|
|
![]() ![]() |
![]() |
Текстовая версия | Сейчас: 16th June 2025 - 13:28 |