Создайте программу, которая подсчитывает количество
введённого символа во введённой строке.
Задача должна быть выполнена с использованием преобразования данных.
Ответы
Ответ дал:
0
Ответ:
var
s: string;
i, k: integer;
begin
readln(s);
writeln('Длина строки: ', length(s));
for i := 1 to length(s) do
if s[i] = ' ' then inc(k);
writeln('Количество пробелов: ', k);
writeln('Длина первого слова: ', pos(' ', s) - 1)
end.
Объяснение:
pascal
Вас заинтересует
1 год назад
1 год назад
1 год назад
1 год назад
7 лет назад
8 лет назад