Составить программу в паскале, что бы из слова "Победа" поочередно убирались буквы, примерно так:
Победа
Обеда
Беда
еда
да
а

//Pascalvar S: string;beginS := 'Победа';while Length(S) <> 0 dobegin  writeln(S);  delete(S,1,1);end;end.

// PascalABC.NET 3.3, сборка 1583 от 25.11.2017// Внимание! Если программа не работает, обновите версию!begin  var s:='Победа';  for var i:=1 to s.Length do Writeln(s[i:])end.РезультатПобедаобедабедаедадаа