Необходимо из слова 039;строка039; сделать 3 других слова (копируя буквы из

Нужно из слова 'строка' сделать 3 иных слова (копируя буквы из этого слова в иные переменные(через индексы букв )

Задать свой вопрос
1 ответ

program raf105;

var s,s1:string;

begin

s:= 'строчка';

s1:= s1 + copy(s,1,1) + copy(s,4,1) + copy(s,3,2) + copy(s,5,3);

writeln(s1);

s1:= '';

s1:= s1 + copy(s,1,1) + copy(s,4,1) + copy(s,3,2) + copy(s,6,2);

writeln(s1);

s1:= '';

s1:= s1 + copy(s,6,2) + copy(s,5,3);

writeln(s1);

s1:= '';

end.

Язык PascalABC

, оставишь ответ?
Имя:*
E-Mail:


Добро пожаловать!

Для того чтобы стать полноценным пользователем нашего портала, вам необходимо пройти регистрацию.
Зарегистрироваться
Создайте собственную учетную запить!

Пройти регистрацию
Авторизоваться
Уже зарегистрированны? А ну-ка живо авторизуйтесь!

Войти на сайт