Я надеюсь тебе будет понятно мои каракули
Море-орел-лото-очаг-гном-мышь...
Свет-тема-ария-яхта...
Цирк-клоп-парк-кора...
Снег-гром-морж-жало...
они писали слова на русском но шрифт стоял английский "Rfrltkf&"- какдела? "Ltrf.ehjrb"-делаюуроки
<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.