Дана символьная строка, содержащая русские буквы, цифры и пробелы. Написать строку задом наперед, удалив из нее все цифры и пробелы
Ответы
Ответ дал:
0
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.
Вас заинтересует
7 лет назад
9 лет назад
9 лет назад