Среди двухзначных чисел найти сумму квадратов цифр - вопрос №146651013 от КсенияВиленская 22.01.2021 20:31

Question

Информатика: Среди двухзначных чисел найти сумму квадратов цифр которых делится на 13 составить программу с ! пааскаль

КсенияВиленская · Answer

var i,s:integer;BEGIN s := 0; for i := 10 to 99 do if i mod 13 = 0 then s := s + (sqr(i div 10)+sqr(i mod 10)); write(s)END....