Решение задачи № 1 из главы 16.Пользователь вводит символ ch и строку s посчитайте сколько раз символ ch встречается в строке
Primary tabs
Пользователь вводит символ ch и строку s
посчитайте сколько раз символ ch встречается в строке s
program pascal_char_in_string1; var i,amount :integer; s : string; ch : char; begin writeln('input char and string : ' ); readln( ch, s ); amount := 0; for i := 1 to length( s ) do begin if( s[i] = ch ) then amount+=1; end; writeln( 'amount char ',ch, ' in string : ' , amount )
- Log in to post comments
- 2218 reads
sergio
Sun, 05/03/2020 - 19:50
Permalink
.
.