Помогите описать алгоритм!!!

10-11 класс

uses crt;

var s, sn, sg: string;

i: integer;

begin

write('s=');

readln(s); sn:='';

for i:=1 to length(s) do

Paulamanka 24 апр. 2013 г., 21:57:57 (11 лет назад)

Рейтинг

+ 0 -

Хороший вопрос

0 Жалоба

Ответить

+ 0 -

MrHolmes5

24 апр. 2013 г., 23:17:38 (11 лет назад)

А что тут особо описывать? Считывается строка, потом в ней делается корявая попытка заменить найденную точку троеточием. Поскольку при такой замене появляются две добавочные точки, под замену попадает вторая из вставленных точек и заменяется еще на две... строка постоянно растет на две точки, они множатся... а цикл идет до первоначальной длины строки.
Результат - после первой точки в строку вставляются точки в количестве, равном количеству символов, считая от позиции этой точки до конца строки в её первоначальном виде. Остальные символы из первичного вида строки останутся неизменными, следуя за полученным набором точек.

Хороший ответ

0 Жалоба Ответить

+ 0 -

DivaG

25 апр. 2013 г., 0:16:27 (11 лет назад)

uses crt;
var s, sn: string;
i: integer;
begin
write('s=');
readln(s);

sn := '';
for i := 1 to length(s) do
    if s[i] = '.' then
      sn := sn + '...'
    else sn := sn + s[i];

write('s=', sn);
readkey;
end.

Вводим строку. Пробегаем по всей ее длине и каждый символ по очереди записываем в новуйу строку, если же встречаем точку, то записываем вместо нее троеточие
Короче - заменяем все точки строки на троеточия

Хороший ответ

0 Жалоба Ответить

Ответить

Другие вопросы из категории

Bebiclasss / 24 апр. 2013 г., 18:22:18

Для кодирования

букв Е,П, Н, Ч, Ь используются двоичные
коды чисел 0, 1, 2, 3 и 4 соответственно (с
сохранением одного незначащего нуля
в случае одноразрядного представления).
Если таким способом закодировать
последовательность символов ПЕЧЕНЬЕ
и записать результат в восьмеричном
коде, то получится:

1) 1030240 2) 12017 3) 2141351 4) 23120