Регистрация
alinasad337
10.11.2020 05:19
Информатика
Есть ответ 👍

Подсчитать сколько знаков препинания в заданном с клавиатуры тексте

291
467
Посмотреть ответы 2

Ответы на вопрос:

6ahah9812
6ahah9812
4,6(46 оценок)

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

 

если я забыл про какие то знаки препинания,то просто допиши их также как и остальные знаки)

marehkolia2343Apple
marehkolia2343Apple
4,8(29 оценок)
92 в десятеричной

Популярно: Информатика