% PEng 6.12
% Program som läser en sträng och ett tecken, räknar antalet förekomster av
% tecknet i strängen

user_string = input('Skriv en sträng: ', 's');
user_char = input('Skriv ett tecken: ', 's');

% För att vara säker (om redan 1 tecken gör denna rad ingenting)
user_char = user_char(1);

% ALT 1: med for-slinga
ntimes = 0;
for i = 1:length(user_string);
	if (user_string(i) == user_char)
		ntimes = ntimes + 1;
	end
end
disp(['Tecknet fanns ', num2str(ntimes), ' ggr i strängen.'])

% ALT 2: med strfind
char_pos_in_string = strfind(user_string, user_char);
ntimes = length(char_pos_in_string);
disp(['Tecknet fanns ', num2str(ntimes), ' ggr i strängen.'])

