Дана символьная строка, содержащая буквы, цифры и пробелы. написать строку задом наперед, удалив из нее все цифры и пробелы

kseniazaica kseniazaica    2   22.05.2019 11:20    1

Ответы
AvdAda24 AvdAda24  17.06.2020 20:22

uses crt;
var
  i: integer;
  s,z: string;
begin
  clrscr;
  write('Введи текст: '); read(s);
  z:= ' '; 
  for i:=1 to Length(s) do
    if (not ((s[i]=' ') or (s[i] in ['0'..'9'])))
      then z:= s[i]+z;
  writeln('Новый текст: ',z);
end.

ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика