Ответы на вопрос:
Sub z() dim s as stringdim i as integerdim n as integerfor i = 1 to 5s = inputbox("введите строку") if s = "." or s = "," or s = "; " or s = ": " then n = n + 1next imsgbox ("знаков препинания: " & n)end sub
Популярно: Информатика
-
Farzalievik13.12.2020 16:07
-
055637211327.06.2023 17:43
-
ktoya224.06.2023 05:09
-
hhgfg20.10.2022 20:21
-
EkaterinaVNTOGLIATTI30.03.2020 10:35
-
Faleck07.09.2021 04:26
-
eminimanov19813.10.2021 13:28
-
15081976107.06.2023 18:09
-
Эноа30.10.2020 13:42
-
миханемельянов24.03.2023 01:27