Pascal. Нужно прорисовать что-то (любой рисунок, хоть квадрат) в программе, взять в буфер обмена, и в основной программе, когда описываем движение, то использовать картинку (этот квадрат) из буфера обмена, сделав к ней обращение. Я не понимаю, какая функция делает буфер обмена в Pascal ABC (графический) ? Можете написать пример проги?
begin
var s:=ReadLnString('Вводите:');
s.ToWords.Where(x->x=ReverseString(x)).PrintLn;
end.
Тестовое решение:
Вводите: дед иван достал наган и пошел с ним в шалаш
дед наган и с в шалаш
Вариант, если исключить однобуквенные:
// PascalABC.NET 3.0, сборка 1139 от 10.01.2016
begin
var s:=ReadLnString('Вводите:');
s.ToWords.Where(x->x=ReverseString(x)).
Where(x->x.Length>1).PrintLn;
end.
Тестовое решение:
Вводите: дед иван достал наган и пошел с ним в шалаш
дед наган шалаш