Пятница, 24.01.2025
Pascal 4 All
[ · Новые сообщения · Участники · Правила форума · Поиск · RSS ]

 

  • Страница 1 из 1
  • 1
Модератор форума: Seqular, Pavel  

Помогите решить задачу
WwWДата: Вторник, 28.04.2009, 21:34 | Сообщение # 1
Знакомый
Группа: Пользователи
Сообщений: 23
Репутация: 0
Замечания: 0%
Статус: Offline
Есть текстовый файл. Создать символьный файл, в который входят все символы, которые встречаются в тексте, включая пробелы и знаки припинания (без повторений).
 
FirefrominsideДата: Пятница, 01.05.2009, 04:50 | Сообщение # 2
Уже "свой"
Группа: Модераторы
Сообщений: 85
Репутация: 0
Замечания: 0%
Статус: Offline
Будет где-то так!
Code

Program Www;
uses crt;
var f:text; g;file of char;
n:char;
  BEGIN
   Assign(f,'адрес к физическому файлу');
    Reset(f);
   Rewrite(g);
  While not(EOF(f)) do begin
   Read(f,n);
if (n<>' ')and(n<>',')and(n<>'.') then
write(g,n);
end;
close(f);
close(g)
end;


Большая просьба выкладывать хоть какой-то код Вашей программы.
Это поможет найти общий язык между Вами и нами! =)
И не забываем благодарить за помощь=)
Нужна помощь с задача С++? тебе сюда bc-for-all.ucoz.ru
 
  • Страница 1 из 1
  • 1
Поиск:

Copyright MyCorp © 2025
Используются технологии uCoz
javascript:;" rel="nofollow" onclick="loginPopupForm(); return false;