альстофер
Опубликовано 6 лет назад по предмету Информатика от альстофер


Помогите, пожалуйста! Через паскаль! Тема: «Поиск наибольшего или наименьшего элемента массива» Написать программу, которая запрашивает у пользователя строку и заменяет в ней все пробелы знаками подчеркивания '_' Не использовать: const, count и другие, которые не по теме!

  1. Ответ
    Ответ дан estengseant
    var i: Integer;s: String;beginwriteln('Введите текст');readln(s);for i:=1 to Length(s) dobeginif s[i]=' ' then s[i]:='_';end;writeln(s);end.
  2. Ответ
    Ответ дан smfliss
    var    g: string;    i: byte;begin    readln(g);    i := 1;    while g[i] = ' ' do delete(g,i,1);    i := length(g);    while g[i] = ' ' do begin delete(g,i,1); i := i - 1 end;    i := 1;    while i <= length(g) do begin  if g[i] = ' ' then   if g[i-1] = '*' then begin    delete(g,i,1);    i := i - 1;   end   else begin    delete(g,i,1);    insert('_',g,i);   end;  inc(i);    end;    writeln(g);end.
Не тот ответ, который вам нужен?
Найди нужный
Задай вопрос

Лучшие за месяц