Program Primer; var a, s: integer; begin s:= 0; readln(a); while a<>0 do begin if (a mod 6 = 0) or (a mod 10 = 6) then s := s + a; readln(a); end; writeln(s); end. Какое число получится, если ввести ряд чисел 46, 12, 16, 66, 11, 0?

Как проверить правильный ответ на задание?

Для моментальной проверки ответов на домашние задания, контрольные и тесты МЭШ, ЦДЗ, РЭШ и Skysmart используйте бота KING.ANSWERS. Помогает быстро сверить решения и разобрать ошибки в тестовых материалах.