ЛЁГКАЯ ЗАДАЧА ПО ПАСКАЛЮ! ПОМОГИТЕ, ПОЖАЛУЙСТА! Составьте программу которая позволяет удалить второе слово строки s. Строку s, состоящую из 2 слов, разделённых пробеламі, введите с клавbатуры.
var s: string; x,i: byte; begin writeln('Введите строку:'); readln(s); for i:=2 to length(s) do begin if s[i]=' ' then begin x:=i 1; while (s[x]<>' ') and (x delete(s,x,1); end; delete(s,x,1); break; end; end; writeln(s); end. -------------------------- Пример 1: мама мыла мама Пример 2: Мама мыла раму Мама раму --------------------------- PS: считается, что строка не начинается с пробела и не может быть два пробела подряд
более месяца назад
Ваш ответ:
Вы можете из нескольких рисунков создать анимацию (или целый мультфильм!). Для этого нарисуйте несколько последовательных кадров
и нажмите кнопку Просмотр анимации.
