Завдання. створити web-сторінку, що має назву сайт . назва задається таким кодом? title> /title
209
381
Ответы на вопрос:
function dele (s : string) : string; var l,i : integer; begin l : = length (s); i : = l; while i> 0 do begin if (s[i] = ' ') and (i< l) then if s[i+1] = ' ' then begin delete (s,i,1); i : = i -1; end; i : = i -1; end; result : = s; end; var a : string; begin readln (a); writeln (dele(a)); end.
Популярно: Информатика
-
ekaterinkavas2016.01.2021 05:06
-
dashabar120807.12.2021 00:02
-
alonbinyaminov131.08.2020 21:14
-
llovepet2017.01.2022 19:01
-
VladimirLapskiy10.11.2021 17:28
-
ангелочек163115.07.2021 01:34
-
аааааааа3624.12.2021 16:14
-
JoraUai012.06.2020 16:13
-
mailnadejda07.01.2023 04:30
-
AnnaLyarskaya16.03.2022 05:17