Ребят помогите, легкая программа. Составить программу на Турбо Паскале:

Дана строка. Сформировать новую строку из 2-й, 3-й, 4-й и последней букв.

Question

Информатика

Павлуха

24 марта, 08:45

Ребят помогите, легкая программа. Составить программу на Турбо Паскале:

Дана строка. Сформировать новую строку из 2-й, 3-й, 4-й и последней букв.

+4

Ответы (1)

Знаете ответ на вопрос?

Евномия · Answer 1

Var s1, s2:string;

begin

writeln ('Введите строку:') ;

readln (s1) ;

s2:=s1[2]+s1[3]+s1[4]+s1[length (s1) ];

writeln (s2) ;

end.

Пример:

Введите строку:

программа

рога

Ребят помогите, легкая программа. Составить программу на Турбо Паскале:Дана строка. Сформировать новую строку из 2-й, 3-й, 4-й и последней букв.

Ребят помогите, легкая программа. Составить программу на Турбо Паскале:

Дана строка. Сформировать новую строку из 2-й, 3-й, 4-й и последней букв.