Предмет: Информатика,
автор: cotego700923
(Pascal) Создать файл, состоящий из символов. Удалите из файла все пробелы.
В конец файла запишите «YES», если пробелы были и «NO» - если
пробелов не было.
cotego700923:
из любых символов, вообще любых,(текст, предложения, просто символы и тд)
Ответы
Автор ответа:
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.
Приложения:

Интересные вопросы
Предмет: Русский язык,
автор: куртяшка
Предмет: Русский язык,
автор: Оксана555
Предмет: Русский язык,
автор: shubina1986
Предмет: Литература,
автор: Данил3427676
Предмет: Химия,
автор: Саша10975