Войти Регистрация Спроси ai-bota

Даны натуральное число n, символы s1 . . ,sn преобразовать последовательность s1. . ,sn заменив в ней: г) каждую из групп стоящих рядом точек многоточием ( т.е тремя точками). решить паскаль

Ответ:

паксуха

25.08.2020 11:46

// PascalABC.NET 3.1, сборка 1192 от 07.03.2016
begin
var a:=ReadlnString('Введите строку:');
a:=RegEx.Replace(a,'\.{2,}','...'); Writeln(a);
end.

Тестовое решение:
Введите строку: 34234...2342223424.23423..23424234234234 234242
34234...23422...23424.23423...23424234...234234... ...234242...

0,0(0 оценок)

Популярные вопросы: Информатика

irnairina89

25.02.2023 12:22

Ионическая системы счисления это......

VIP161

29.10.2022 17:44

2.3 Назовите цифровые накопители информации...

вика28121

03.02.2020 09:19

Дополни предложение: Поворот сцены выполняется с...

ghdvbeudv

29.01.2020 07:45

Ниже приведена программа, записанная на языке программирования Паскаль.var s, k: integer;begin readln(s); readln(k); if s = 2 * k then writeln(‘ДА’) else writeln(‘НЕТ’)end.Было проведено...

Настька1210

01.11.2022 15:05

Составить алгоритм на алгоритмическом языке для решения следующей задачи: Найти корни квадратного уравнения ax2 +bx+c = 0...

julia77mama

27.08.2022 15:46

В ячейке B5 электронной таблицы отображается число 0,05. На панели инструментов «Форматирование» нажимается кнопка с изображением знака процентов (%). Какое число будет после этого...

карамелька115

15.06.2020 14:50

Проект № 8 «Мой компьютер будущего» Требования1. Использовать графическийредактор Paint.2. Нарисовать в графическомредакторе свой компьютербудущего.3.Отредактировать рисунок.4.в программе...

lerapro123

30.05.2020 23:31

For i in range(6): if i == 3: continue print (i)...

lvlupiq

28.02.2021 13:14

Program pr; var mas: array[1..10] of integer; i,min,ind: integer; begin randomize; for i: =1 to 10 do begin mas[i]: =random(100) ; write(mas[i], ); end; writeln(); min: =mas[1]; for...

JuliaPetrova56

15.08.2021 01:29

Однокоренные слова к словам вода, дождь,гриб....

Полный доступ

Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota Оформи подписку