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

nastyakravchen6 nastyakravchen6    2   17.04.2020 22:05    0

Ответы
Августина3008 Августина3008  13.10.2020 11:04

// 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.


(Pascal) Создать файл, состоящий из символов. Удалите из файла все пробелы. В конец файла запишите «
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика