2. определить количество трёхзначных цифр, сумма цифр которого равна заданному числу n (в паскале, цикл со счётчиком)

262

459

Посмотреть ответы 2

Ответы на вопрос:

poli36914

Информатика

4,4(69 оценок)

program asd; var x,k,n: integer; beginreadln (n); for x: =100 to 999 do beginif (x div 100 + x div 10 mod 10 + x mod 10 = n) thenk: =k+1; end; writeln (k); readln; end.

sabina1705

Информатика

4,5(2 оценок)

Pascalabc.net 3.3.5, сборка 1659 от 09.04.2018 внимание! если программа не работает, обновите версию! begin readseqintegerwhile(t-> t> 1).aggregate(biginteger(,n)-> m*n).println end. пример 3564 523 7 13632 634534 123236 342 1 4756807744621594586394624