Задать вопрос Регистрация
Помочь другим

  • Как в паскале удалить цифру из числа? Какая для этого команда? :)

Ответы 1

  • var a,b:integer;c:string;beginread(a,b);while (a<>0) do beginif a mod 10 <> b then c+=inttostr(a mod 10);a:=a div 10;end;for a:=length(c) downto 1 dowrite(c[a]);end.

  • Добавить свой ответ

Еще вопросы

Топ пользователей

Войти через Google

 или

Забыли пароль?

У меня нет аккаунта, я хочу Зарегистрироваться

How much to ban the user?
1 hour 1 day 100 years