Предмет: Информатика,
автор: 000138
Инфа 8 класс помогите
С клавиатуры вводится строка. Подсчитать сколько раз в ней встречается точка.
Ответы
Автор ответа:
0
var s: string; i, k: integer;begin writeln('Напишите что-нибудь'); readln(s); k := 0; for i := 1 to length(s) do if (s[i] = '.') then inc(k); write('Количество точек ', k); readlnend.
Интересные вопросы
Предмет: Қазақ тiлi,
автор: diana4624
Предмет: Литература,
автор: elinaisaeva200810
Предмет: Қазақ тiлi,
автор: Min123333
Предмет: Физика,
автор: Scorpio377
Предмет: Литература,
автор: Janeraryvaeva