Ответы на вопрос:
Pascal: var a: integer; s: string; begin readln(a); s: =inttostr(a); if pos('8',s)< > 0 then writeln('есть') else writeln('нет'); end.
Популярно: Информатика
-
Свопросами 1.объекты индентификации 2.классификация вирусов по способу...
GabriellaKiM09.08.2020 04:50 -
2. Для чего применяется блок Данные? Информатика 4 класс...
Николь2807154705.02.2020 20:24 -
Со всеми вопросали! все которые у меня есть! прошу добрых людей...
kattun12.01.2022 06:20 -
Спо информатике ! бирка заполняется согласно данным, соответствующим...
Pentianоs26.10.2021 11:46 -
Решить в программе кумир через язык паскаль на уровне 8 класса...
даша3443015.11.2022 19:09 -
Несжатое растровое изображение размером 64х64 пикселей занимает...
pomoch2121326.03.2020 08:43 -
Решить на паскаль 2. ввести четыре слова на языке. вывести на экран...
777SwimmeR77709.02.2022 09:11 -
Как можно обойтись без использования функции AVERAGE, если нужно...
marisshechka120.04.2023 14:41 -
Звукові моделі слів, редактор, об єкт, модель ??...
nicky23414.04.2021 06:12 -
Складіть проєкт для малювання чотирьох квадратів, розміщених пору...
Liova2322.10.2021 04:55