Множество является подмножеством множества , если любой элемент, принадлежащий , также принадлежит В теории множеств, теории алгоритмов и математической логике, перечисли́мое мно́жество (эффекти́вно перечислимое, рекурси́вно перечислимое, полуразреши́мое множество[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.
В теории множеств, теории алгоритмов и математической логике, перечисли́мое мно́жество (эффекти́вно перечислимое, рекурси́вно перечислимое, полуразреши́мое множество[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.