Инфа 8 класс с клавиатуры вводится строка. подсчитать - вопрос №52730688 от gerrr009 17.03.2021 00:03

Question

Информатика: Инфа 8 класс с клавиатуры вводится строка. подсчитать сколько раз в ней встречается точка.

gerrr009 · Answer

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....