Составить программку вырезки из слова "Моделирование" слова "мода", "фаворит", "дом"Срочно

Составить программку вырезки из слова "Моделирование" слова "мода", "фаворит", "дом"

Безотлагательно

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

program raf105;

var s,s1:string;

begin

s:= 'Моделирование';

s:= lowercase(s);

s1+= copy(s,1,3) + copy(s,10,1);

writeln(s1);

s1:= '';

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

writeln(s1);

s1:= '';

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

writeln(s1);

s1:= '';

end.

Язык PascalABC

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


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

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

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

Войти на сайт