Игра “вот не стало буквы …”. С клавиатуры вводится строка, содержащая только строчные кириллические - id2072330720220808 от Mrztr 08.08.2022 04:14

Question

Информатика: Игра “вот не стало буквы …”. С клавиатуры вводится строка, содержащая только строчные кириллические буквы, например, “всем привет”. Ваша задача - написать программу, которая постепенно будет убирать из строки все буквы алфавита, в том порядке, в котором они следуют в алфавите, и печатать, что получается. В случае с нашей строкой: всем привет (не стало буквы а) всем привет (не стало буквы б) сем приет (не стало буквы в) сем приет (не стало буквы г) сем приет (не стало буквы д) И так далее, пока не

Mrztr · Accepted Answer

pascalОбъяснение:var  i, j ,k: integer;  l, lnew: string;  a: array of integer;begin  Write( Введите число );  ReadLn(l);  SetLength(a ,length(l));  for i := 0 to length(l) - 1 do    a[i] := strtoint(l[i + 1]);      for i := 0 to length(l) - 2 do      for j := i + 1 to length(l) - 1 do        if a[i] a[j] then        begin          k := a[i];          a[i] := a[j];          a[j] := k;        end;     for i := 0 to length(l) - 1 do    lnew := lnew + inttostr(a[i]);  WriteLn( Новое число равно , lnew);end....

MOGZ ответил