Решить в turbo pascal. : поиск букв в слове. напишите программу для проверки, есть ли в данном слове буква «а». если есть, то найдите номер первой из них.
107
424
Ответы на вопрос:
Beginvar a: string; var i: integer; read(a); for i: =1 to length(a) dobegin if a[i] = 'a' thenbeginwriteln('найдена буква а, ее позиция: ' , i); break; end; end; end.
Популярно: Информатика
-
Ангелина7564567416.06.2023 23:54
-
Gutrom27.05.2022 19:48
-
фелицист20.04.2021 14:21
-
ghostridermen17.11.2021 04:50
-
dilnazka310.11.2020 22:55
-
alexweber201629.05.2023 05:39
-
Yoidzokumi30.07.2021 23:40
-
Odarchuk14.06.2022 14:41
-
KatiaSur10.07.2020 16:29
-
retrovaweforyou21.08.2021 18:56