Составить программу на языке програмирования паскаль : ...
Составить программу на языке програмирования паскаль : Подсчитать количество букв "а" в заданном тексте.
Заранее благодарю .
Есть ответ
18.12.2022
188
Ответ
uses crt;var x:string[200];i,k:integer;beginclrscr;readln(x);k:=0;for i:=1 to length(x) doif copy(x,i,1)='f' then k:=k+1;writeln('Chislo bukv f= ',k);readln;end.Считает количество букв "f" в заданном тексте
Если вы нашли правильное решение, вы можете поблагодарить нас начиная с 10 рублей.
Просто нажмите на кнопку "Подарить".
Просто нажмите на кнопку "Подарить".
18.12.2022