Дана строка, состоящая из 50 символов. Составьте программу, используя процедуру ...

March 2022 1 25 Report

Дана строка, состоящая из 50 символов. Составьте программу, используя процедуру которая определяет сколько раз встречается в строке слог ‘ea’.

Answers & Comments

Gleb1Kosyrev

Verified answer

Var s:string;k:integer;

procedure SubInc(var s:string;var k:integer);
begin;
while pos('ea',s)<>0 do
begin;
delete(s,pos('ea',s),2);
inc(k);
end;
end;

begin;
readln(s);
if length(s)<>10 then exit;
SubInc(s,k);
writeln(k);
end.

0 votes Thanks 0

Gleb1Kosyrev Ох, используя процедуру. Сейчас исправлю.

cent85 Спасибо огромное

dan zagolovok function fxchar yreal zintegerboolean kakie iz sleduyushih

Answer

cent85 March 2022 | 0 Ответы

napishite programmu ispolzuya dinamicheskie peremennye kotoraya vychislyaet celoe i o

Answer

Answers & Comments

Verified answer

dan zagolovok function fxchar yreal zintegerboolean kakie iz sleduyushih

napishite programmu ispolzuya dinamicheskie peremennye kotoraya vychislyaet celoe i o

рекомендуемые вопросы

Helpful Links

Helpful Social