Turbo Pascal. Путем копирования и склейки из слова 'путеводитель' получить слова: водит

Turbo Pascal. Путем копирования и склейки из слова 'путеводитель' получить слова: водитель, путь, дело, дети.
Гость
Ответ(ы) на вопрос:
Гость
Program n_1;var s, s1, s2, s3, s4, s5, s6, s7, s8: string;begin s:='путеводитель'; s1:=s;delete(s1, 1, 4); s2:=s;delete(s2, 4, 8); s3:=copy(s, 7, 1);s4:=copy(s, 4, 1);s5:=copy(s, 11, 1);s6:=copy(s, 6, 1); s7:=s3+s4+s5+s6; s3:=copy(s, 7, 1);s4:=copy(s, 4, 1);s5:=copy(s, 3, 1);s6:=copy(s, 8, 1); s8:=s3+s4+s5+s6; writeln(s1, ' ', s2, ' ', s7, ' ', s8, ' '); end.
Не нашли ответ?
Ответить на вопрос
Похожие вопросы