Ответы на вопрос:
program foo;
var
s: string[12];
s1: string[4];
begin
s : = 'тестирование';
s1 : = ( copy(s, 10, 2), copy(s, 8, 2) );
write(s1)
end.
Популярно: Информатика
-
Alma8808.12.2020 07:51
-
aleshkaaaa128.08.2021 03:15
-
Marketing2322.05.2020 14:02
-
BlackPorshe235628.03.2021 07:56
-
maks643409.11.2021 06:38
-
nastushka20803.03.2023 22:33
-
ardolg23.03.2020 07:34
-
milana0372milana01.02.2023 18:11
-
apolo230kmn04.10.2020 23:17
-
АринаБелочка180324.05.2021 02:54