М. Выберите программу для обработки текстовой инфор-
мации.
1) StarOffice Draw
2) StarOffice Impress
3) MS Word
4) Калькулятор
АЅ. Какая операция не применяется для редактирования
текста?
1) печать текста
2) замена неверно набранных символов
3) вставка пропущенных символов
удаление неверно набранных символов
163
303
Ответы на вопрос:
Var s,s1: string; i,p: integer; begin writeln('введите строку: '); readln(s); s1: =''; for i: =1 to length(s) do case s[i] of ',','.' : s1: =s1+s[i]+' '; '-' : s1: =s1+' - '; else s1: =s1+s[i]; end; p: =pos(' ',s1); while p> 0 do begin delete(s1,p,1); p: =pos(' ',s1); end; p: =pos(' ,',s1); while p> 0 do begin delete(s1,p,1); p: =pos(' ,',s1); end; p: =pos(' .',s1); while p> 0 do begin delete(s1,p,1); p: =pos(' .',s1); end; writeln(s1); end. пример: введите строку: перед точкой или запятой пробела нет ,но после -есть . перед точкой или запятой пробела нет, но после - есть.
Популярно: Информатика
-
пптл03.12.2021 04:39
-
wondermang26.01.2020 08:58
-
grxrtxdfdr22.12.2022 00:55
-
поварешка126.01.2021 05:27
-
Moldir9412.10.2022 08:09
-
suhrobiddin9825.07.2022 05:38
-
вообшетоямаг07.06.2020 11:06
-
teorem24.07.2021 06:57
-
nastyaivanova10k18.01.2021 00:20
-
eninivan201616.09.2021 13:12