M: =0; for i: =1 to length (a)do if copy (a,i,1)=(e) then m: =m+1 writin (m); нужно место е поставить точку . нужно

missshapliko20 missshapliko20    2   26.08.2019 03:50    1

Ответы
Багирая Багирая  05.10.2020 20:13
m:=0;
for i:=1 to length(a) do
 if copy (a,i,1)='.' then m:=m+1;
writeln(m);

А лучше так:
m:=0;
for i:=1 to length(a) do
 if a[i]='.' then m:=m+1;
writeln(m);
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика