Напишите программу, которая считает знаки пунктуации - вопрос №8119461 от lisa301 16.04.2020 03:08

Question

Информатика: Напишите программу, которая считает знаки пунктуации в символьной строке. к знакам пунктуации относятся символы из набора «.,; : ! ? ». формат входных данных программа получает на вход символьную строку (длина строки не больше 100 символов). формат выходных данных программа должна вывести общее количество знаков пунктуации во входной строке. примеры входные данные выходные данные hi, guys! 2

lisa301 · Answer

Var s,p:string; k,i:integer;beginreadln(s);p:= .,;:!? ;k:=0;for i:=1 to length(s) do if pos(s[i],p) 0 then k:=k+1;writeln( k = ,k);end.Пример:Hi, guys!k = 2...