Вводится строка с количеством символов кратным пяти. Например (5,10,15 и т.д) Вывести на экран третью по порядку пятую часть строки. Например. Строка retmutsike, На экране появится ut. Пишите на любом языке.
Вводится строка с количеством символов кратным пяти. Например (5,10,15 и т.д) Вывести на экран третью по порядку пятую часть строки.
Например. Строка retmutsike, На экране появится ut. Пишите на любом языке.
Гость
Ответ(ы) на вопрос:
Гость1. Средства функционального программирования
// PascalABC.NET 3.1, сборка 1239 от 08.05.2016
// Также проверено в WDE: http://pascalabc.net/WDE
begin
var s:=ReadlnString('>');
s.Batch(s.Length div 5).Skip(2).Take(1).Aggregate((c1,c2)->c1+c2).Println('')
end.
Тестовое решение
> retmutsike
ut
2. Еще один вариант (на слайсах)
// PascalABC.NET 3.1, сборка 1239 от 08.05.2016
// Также проверено в WDE: http://pascalabc.net/WDE
begin
var s:=ReadlnString('>');
var m:=s.Length div 5;
s[2*m+1:3*m+1].Println('')
end.
3. Стандартные средства Паскаля
var
s:string;
m:integer;
begin
Write('>'); Readln(s);
m:=s.Length div 5;
Writeln(Copy(s,2*m+1,m))
end.
Не нашли ответ?
Похожие вопросы