• В Паскале ввести целое число и определить сколько в этом числе троек. Я не очень в программировании, поэтому помогите пожалуйста ))

Ответы 2

  • Спасибо Вам огромное) все верно)))
  • var a,b,c,d:integer;beginwriteln('введите числo');readln(a);b:=0;while a<>0 do beginc:=a mod 10;a:=a div 10;if c=3 then b:=b+1;end;writeln('количество троек в числе ',b);end.
    • Автор:

      erik606
    • 6 лет назад
    • 0
  • Добавить свой ответ

Еще вопросы

Войти через Google

или

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

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

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