Среди двухзначных чисел найдите те, сумма квадратов цифр которых делиться на 13. В ПАСКАЛЕ!!!! Пожалуйста!!!
Ответы:
28-10-2014 13:46
var i,d,e:integer;begin for i:=10 to 99 do begin d:=i div 10; e:=i mod 10; if ((sqr(d)+sqr(e)) mod 13)= 0 then Write(i,) endend.Результат выполнения программы:15 18 23 32 46 47 51 64 69 74 79 81 96 97
⭐⭐⭐⭐⭐ Лучший ответ на вопрос «Среди двухзначных чисел найдите те, сумма квадратов цифр которых делиться на 13. В ПАСКАЛЕ!!!! Пожалуйста!!!» от пользователя ВАЛЕНТИН АНТОШКИН в разделе Экономика. Задавайте вопросы и делитесь своими знаниями.
Открой этот вопрос на телефоне - включи камеру и наведи на QR-код!