Создайте программу, выводящую ** экран 3, 7 и 9 символ строки. Паскаль

Question

Создайте
программу, выводящую на экран 3, 7 и 9 символ строки. Паскаль

Answer 1

var
  s: string;
begin
  readln(s);
  writeln(s[3], s[7], s[9]);
end.