Описание слайда:
Что получится в результате выполнения программы? program primer; var a, b, c, d: string; begin a:= ‘лекарство’; b:= copy (a, 8, 1) + copy (a, 4, 1) + copy (a, 1, 2) + copy (a, 7, 1); c:= copy (a, 3, 1) + copy (a, 5, 1) + copy (a, 2, 1) + copy (a, 6, 1) + copy (a, 1, 1) + copy (a, 9,1); d:= copy (a, 6, 1) + copy (a, 2,1) + copy (a, 7, 1) + copy (a, 3, 2); write (b, ‘ ‘, c, ‘ ‘, d); end.