Хлеба ни куска, так и в горле тоска.<span>Чеснок да редька - так и на животе крепко.
</span>Завтрак съешь сам, обед раздели с другом, ужин - отдай врагу.Когда я ем я глух и нем.недосол-на столе,пересол-на спине...<span><span>Без блина не маслена; без пирога не именинник.
Без ложки и добрый едок станет.
Без соли и хлеб не естся.
Без соли невкусно, а без хлеба несытно. Без соли стол кривой.
</span></span>
<em>// PascalABC.NET 3.2, сборка 1367 от 20.12.2016</em>
<em>// Внимание! Если программа не работает, обновите версию!</em>
begin
var t:integer;
var k:=0;
repeat
Read(t);
if t.ToString.Where(c->c='5').Count=2 then k+=1
until t=0;
Writeln('Количество чисел с двумя пятерками равно ',k)
end.
<span>2001 - 12 + 18 = 2007
0111 1101 0001 - 1100 + 0001 0010 = 0111 1101 0111</span>