{$mode objfpc}
uses Classes, SysUtils, StrUtils;
function ReadLine(): String;
begin
ReadLn(Result);
end;
function OnlyLetters(Str: String): String;
var Element: Char;
begin
Result := '';
for Element in Str do
begin
if Element in ['a'..'z', 'A'..'Z'] then
begin
Result += Element;
end;
end;
end;
var Line: String;
var Tokens: TStringList;
var Token: String;
var ConjuctionsCounter: Integer;
begin
Tokens := TStringList.Create;
Tokens.Delimiter := ' ';
while not EOF() do
begin
Tokens.DelimitedText := ReadLine();
for Token in Tokens do
begin
if AnsiMatchStr(LowerCase(OnlyLetters(Token)),
['i', 'lub', 'albo', 'lecz',
'ale', 'na', 'zatem', 'bo',
'dlatego', 'oraz'
]) then
begin
Inc(ConjuctionsCounter);
end;
end;
end;
WriteLn(ConjuctionsCounter);
end.
eyRtb2RlIG9iamZwY30KdXNlcyBDbGFzc2VzLCBTeXNVdGlscywgU3RyVXRpbHM7CiAKZnVuY3Rpb24gUmVhZExpbmUoKTogU3RyaW5nOwpiZWdpbgogIFJlYWRMbihSZXN1bHQpOwplbmQ7CgpmdW5jdGlvbiBPbmx5TGV0dGVycyhTdHI6IFN0cmluZyk6IFN0cmluZzsKdmFyIEVsZW1lbnQ6IENoYXI7CmJlZ2luCiAgUmVzdWx0IDo9ICcnOwogIGZvciBFbGVtZW50IGluIFN0ciBkbwogIGJlZ2luCiAgICBpZiBFbGVtZW50IGluIFsnYScuLid6JywgJ0EnLi4nWiddIHRoZW4KICAgIGJlZ2luCiAgICAgIFJlc3VsdCArPSBFbGVtZW50OwogICAgZW5kOwogIGVuZDsKZW5kOwoKdmFyIExpbmU6IFN0cmluZzsKdmFyIFRva2VuczogVFN0cmluZ0xpc3Q7IAp2YXIgVG9rZW46IFN0cmluZzsKdmFyIENvbmp1Y3Rpb25zQ291bnRlcjogSW50ZWdlcjsKYmVnaW4KICBUb2tlbnMgOj0gVFN0cmluZ0xpc3QuQ3JlYXRlOwogIFRva2Vucy5EZWxpbWl0ZXIgOj0gJyAnOwogIAogIHdoaWxlIG5vdCBFT0YoKSBkbwogIGJlZ2luCglUb2tlbnMuRGVsaW1pdGVkVGV4dCA6PSBSZWFkTGluZSgpOwoJZm9yIFRva2VuIGluIFRva2VucyBkbwoJYmVnaW4KCSAgaWYgIEFuc2lNYXRjaFN0cihMb3dlckNhc2UoT25seUxldHRlcnMoVG9rZW4pKSwgCgkgICAgICAgIFsnaScsICdsdWInLCAnYWxibycsICdsZWN6JywgCgkgICAgICAgICAnYWxlJywgJ25hJywgJ3phdGVtJywgJ2JvJywgCgkgICAgICAgICAnZGxhdGVnbycsICdvcmF6JwoJICAgICAgICBdKSB0aGVuCgkgIGJlZ2luCgkgICAgSW5jKENvbmp1Y3Rpb25zQ291bnRlcik7CgkgIGVuZDsKCWVuZDsKICBlbmQ7CiAgV3JpdGVMbihDb25qdWN0aW9uc0NvdW50ZXIpOwplbmQu
RGxhY3plZ28/IApEbGF0ZWdvISAKTmEgdGVnbyB3aW5vd2FqY2UgbHViIHpkcmFqY2Ugb3JheiBzenVqZSB6YXRlbSBydXN6eW15LCAKYm8gbmllIG1hIGNvIGN6YXN1IG1hcm5vd2FjLg==
Dlaczego?
Dlatego!
Na tego winowajce lub zdrajce oraz szuje zatem ruszymy,
bo nie ma co czasu marnowac.