Question

Составить программу которая получает из слова «ДЕЛФИ» слово «ДЕЛО» и «ЛИФТ».

Answer 1

begin
  var s: string := 'ДЕЛФИ';
  //readln(s);
  writeln(s[1] + s[2] + s[3] + 'O');
  writeln(s[3] + s[5] + s[4] + 'T');
end.