svalevayulia10
24.08.2022 04:04

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

Нажмите на рекламу ниже и сразу увидите ответ
Популярные вопросы:
Ответ:
020577
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, вроде я не ошибся.
0,0(0 оценок)
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota Оформи подписку
logo
Начни делиться знаниями
Вход Регистрация
Что ты хочешь узнать?
Спроси ai-бота