Выполнить задачи в Паскале: 2.2. Подсчитать количество предлогов "в" в данном предложении. 2.3. Удалить предлоги "с" в строке.
Выполнить задачи в Паскале:
2.2. Подсчитать количество предлогов "в" в данном предложении.
2.3. Удалить предлоги "с" в строке.
Гость
Ответ(ы) на вопрос:
Гостьvar s:string;i,n,k:integer;
begin
s:= 'Вот это в задание требует в предлогов в данном в предложении';
n:= length(s);
for i:= 2 to n-1 do begin
if (s[i-1]=' ') and (s[i]= 'в') and (s[i+1]=' ') then begin writeln(i,s[i]:3);
k:= k +1;end;end;
write(k);end.
Не нашли ответ?
Похожие вопросы