Вопрос по информатике:
ПОМОГИТЕ С ПРОГРАММОЙ. Язык #паскаль.
Дана строка, состоящая из русских слов, разделенных пробелами (одним или несколькими). Вывести строку, содержащую эти же слова, разделенные одним символом "."(точка). В конце строки точку не ставить.
- 07.11.2017 21:10
- Информатика
- remove_red_eye 14744
- thumb_up 31
Ответы и объяснения 1
Var
s,s1,s2:string;
l,l1:char;
i,x,x1:integer;
begin
readln(s);
for I:= 2 to length(s)-1 do begin
l:=s[i];l1:=s[i+1];x:=ord(x);x1:=ord(l1);
if (l=' ') and (x132) then s1:=s1+'.' else if x32 then s1:=s1+l;
end;
s1:=copy(s,1,1)+s1+copy(s,length(s),1);
while ((s1[1]=' ') or (s1[1]='.')) do
s1:=copy(s1,2,length(s)-1);
writeln(s1);
end.
- 08.11.2017 00:43
- thumb_up 31
Знаете ответ? Поделитесь им!
Есть сомнения?
Не нашли подходящего ответа на вопрос или ответ отсутствует? Воспользуйтесь поиском по сайту, чтобы найти все ответы на похожие вопросы в разделе Информатика.
Трудности с домашними заданиями? Не стесняйтесь попросить о помощи - смело задавайте вопросы!
Информатика — наука о методах и процессах сбора, хранения, обработки, передачи, анализа и оценки информации с применением компьютерных технологий, обеспечивающих возможность её использования для принятия решений.