Встроке записанно целое число.при записи этого числа была допущена опичатка: среди цифр находятся посторонние символы.исправьте строку с опичаткой, удалите лишний символ.

пельмешка22 пельмешка22    2   26.05.2019 19:10    0

Ответы
мадина488 мадина488  23.06.2020 07:57
Var s:string;i:integer;
begin
i:=1; read(s);
while i<=length(s) do if (s[i]<'0') or (s[i]>'9') then delete(s,i,1) else i:=i+1;
write(s)
end.
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика