Склавиатуры вводятся 5 символов.подсчитать количество знаков препинания.в vba
175
447
Ответы на вопрос:
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
int: 1,2,3,4,5,6,7... (целочисленные)
float: 2.3, 3.1, 7.1, 5.1, 8.43 (числа с плавающей запятой)
Популярно: Информатика
-
Сашакозлов13лет24.01.2020 10:43
-
BRICKWIH09.07.2021 06:57
-
abrikosikhii22.09.2021 08:13
-
texin50829.06.2023 13:05
-
AbashkinaEvgenia9807.11.2021 22:25
-
МагистрСемен28.10.2021 22:56
-
Po99916.11.2022 13:44
-
MilkaKotik1622.02.2022 10:49
-
viktoriasmirnova20011.05.2023 12:20
-
egor51t76rc13.07.2020 22:34