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

Question

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

dilasagadatova · 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....