(Pascal) Создать файл, состоящий из символов. Удалите из файла все пробелы.
В конец файла запишите «YES», если пробелы были и «NO» - если
пробелов не было.


BobbyFresnel: Из чего его создать?
cotego700923: из любых символов, вообще любых,(текст, предложения, просто символы и тд)
BobbyFresnel: Исходные данные - это Ваша проблема, не нужно ее перекладывать на других.
cotego700923: "Бременские музыканты — сказка, записанная братьями Гримм, которой восхищен не один ребенок уже много лет. В ней рассказывается об удивительном путешествии зверей-изгнанников и о том, как они находят себе дом". Подойдет?

Ответы

Ответ дал: BobbyFresnel
1

// PascalABC.NET

begin

   var s1 := ReadlnString;

   var s2 := s1.Replace(' ', '');

   s2 += if s1.Length > s2.Length then 'YES' else 'NO';

   WriteAllText('MyFile.txt', s2)

end.

Приложения:

cotego700923: Спасибо, разобрался, извините за невнятность
BobbyFresnel: Пожалуйста, на то и комментарии, чтобы разбираться))
Похожие вопросы