Напишите программу, которая считает знаки пунктуации

@Maxim35 · Регистрация: 29.05.2016

Author24 — интернет-сервис помощи студентам

Здравствуйте,помогите пожалуйста написать программу.Напишите программу, которая считает знаки пунктуации в символьной строке. К знакам пунктуации относятся символы из набора ".,;:!?".
Входные данные
Программа получает на вход символьную строку.

Выходные данные
Программа должна вывести общее количество знаков пунктуации во входной строке.

Примеры
входные данные
Hi, guys!
выходные данные
2

@ZX Spectrum-128 · 22.01.2017, 14:41

Pascal

var
  s: string;
  i, count: integer;
 
begin
  readln(s);
  count := 0;
  for i := 1 to length(s) do
    if s[i] in ['.', ',', ';', ':', '!', '?'] then
      inc(count);
  writeln(count);
end.

@Maxim35 0 / 0 / 0 Регистрация: 29.05.2016 Сообщений: 27
		1
	Напишите программу, которая считает знаки пунктуации 22.01.2017, 14:30. Показов 5054. Ответов 1 Метки нет (Все метки) Здравствуйте,помогите пожалуйста написать программу.Напишите программу, которая считает знаки пунктуации в символьной строке. К знакам пунктуации относятся символы из набора ".,;:!?". Входные данные Программа получает на вход символьную строку. Выходные данные Программа должна вывести общее количество знаков пунктуации во входной строке. Примеры входные данные Hi, guys! выходные данные 2 0

	22.01.2017, 14:41

Напишите программу, которая считает знаки пунктуации

Решение