• задано трехзначное положительное целое число. Есть ли среди его цифр 3?Если есть,на каком месте стоит? написать программу на языке паскаль

Ответы 3

  • Но возвращает только первое попавшееся 3. Или нужно показать все позиции троек?
    • Автор:

      tadeooilq
    • 6 лет назад
    • 0
  • все позиции нужно
  • //Pascal ABC.NET Версия 2.2 Сборка 790var a,i:integer;s:string;begin;readln(a);str(a,s);if length(s)<>3 then exit;if pos('3',s)=0 thenbegin;writeln('Nowhere');exit;end;for i:=1 to length(s) doif s[i]='3' then writeln(i);end.Пример ввода:123Пример вывода:3
    • Автор:

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

Еще вопросы

Войти через Google

или

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

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

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