Даю 60 баллов!!! Ребята, помогите пожалуйста. Мне нужно преобразовать слова в паскаль, я...

0 голосов
42 просмотров

Даю 60 баллов!!! Ребята, помогите пожалуйста. Мне нужно преобразовать слова в паскаль, я как преобразовывать понимаю, но не знаю, как сделать так чтобы они все выводились в одну строчку.

слова вот: метка-сетка-седло-сопло-совет-кювет. Как видите на скрине, пыталась в две программы сделать, но что-то не так идет. Можете подсказать, как после 'end" продолжить? Что нужно за команду вводить!!!


image

Информатика (132 баллов) | 42 просмотров
Дан 1 ответ
0 голосов
Правильный ответ
// PascalABC.NET 3.3, сборка 1599 от 17.12.2017
// Внимание! Если программа не работает, обновите версию!

begin
  var s:='метка'; Write(s);
  s[1]:='с'; Write('-',s);
  s:=s[:3]+'дло'; Write('-',s);
  s:=s[1]+'оп'+s[4:]; Write('-',s);
  s:=s[:3]+'вет'; Write('-',s);
  s:='кю'+s[3:]; Writeln('-',s)
end.

Результат
метка-сетка-седло-сопло-совет-кювет
(150k баллов)