Информатика

В числовую переменную последовательно вводятся целые числа, не равные нулю. кол-во вводимых чисел n неизвестно. Найти сумму тех чисел, в которых встречаются ровно две цифры 5.(в паскале написать программу)


<< Предыдущий вопрос Следующий вопрос >>

Проверенные ответы содержат надёжную, заслуживающую доверия информацию, оценённую командой экспертов. На "Знаниях" вы найдёте миллионы ответов, правильность которых подтвердили активные участники сообщества, но Проверенные ответы - это лучшие из лучших.

//PascalABC.NET версия 3.2, сборка 1367
begin
    var sum := 0;
    for var i := 1 to ReadInteger('n=') do
    begin
        var num := ReadInteger('Введите число =');
        if num.ToString().ToCharArray.Count(c -> c = '5') = 2 then
            sum += num;
    end;
    Writeln(sum);
end.

Загрузить файл
Сомневаешься в ответе?

Если сомневаешься в правильности ответа или его просто нет, то попробуй воспользоваться поиском на сайте и найти похожие вопросы по предмету Информатика либо задай свой вопрос и получи ответ в течении нескольких минут.


Смотреть другие ответы