Найдите количество двузначных чисел, которые делятся на сумму своих цифр.pascal abc

Alexy7406 Alexy7406    2   15.06.2019 11:20    3

Ответы
Рома67463 Рома67463  12.07.2020 16:16
Чувак, я не знаю паскаля, в коде могут быть ошибки синтакисиса. По сути так:
begin
    var count : integer;
    for var i := 10 to 99 do
        if i mod (i mod 10 + i div 10)  < 1 then count := count + 1;
end;
Это PascalABC.Net, вроде я не ошибся.
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика