Ответы
Ответ дал:
3
program foo;
var
s: string[12];
s1: string[4];
begin
s := 'ТЕСТИРОВАНИЕ';
s1 := XXXXX( Copy(s, 10, 2), Copy(s, 8, 2) );
write(s1)
end.
BobbyFresnel:
Внимание! Этот сайт НЕ ДАЕТ сохранить ответ, когда там указано имя нужной функции.
Похожие вопросы
1 год назад
1 год назад
1 год назад
2 года назад