1. (Char). Пользователь вводит текст, признаком конца которого является точка. Напечатать true, если буква "а" встречается чаще, чем буква "в", и напечатать false в противном случае.

Question

Информатика

Наталя

25 октября, 17:17

1. (Char). Пользователь вводит текст, признаком конца которого является точка. Напечатать true, если буква "а" встречается чаще, чем буква "в", и напечатать false в противном случае.

+1

Ответы (1)

Знаете ответ на вопрос?

Таюта · Answer 1

var

c:char;

a, b:integer;

begin

c:='a'; while (c '.') do begin

if (c = 'а') then inc (a) else if (c = 'в') then inc (b) ;

read (c) ;

end;

if (a > b) then write ('true') else write ('false') ;

end.