Question

6. Что будет выведено на экран после выполнения программы? s := '123456789'; s1 := 'abcdef'; s := Copy(s,5,2) '0' Copy(s1,3,3); writeln ( s );

Answer 1

Предполагаю, что в 
s := Copy(s,5,2) '0' Copy(s1,3,3);
Случайно пропущены два '+' если так то вот

var
  s,s1:string;
begin
  s := '123456789';
  s1 := 'abcdef';
  s := Copy(s,5,2) + '0' + Copy(s1,3,3);
  writeln ( s );
end;