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

Question

Найти все двузначные числа, квадрат суммы цифр которых делится на 15 (4 способа)

Answer 1

39

skldfjfd

15 апреля 2023

program z; var i,a,a1,s: integer; beginwriteln ('Двухзначные числа, квадрат суммы цифр которых делится 13'); for i: =10 to 99 dobegina: =i; s: =0; while a<>0 dobegina1: =a mod 10; s: =s+a1; a1: =a div 10; a: =a1; end; if sqr (s) mod 13=0thenwriteln (i); end; end.

пользователи выбрали этот ответ лучшим

комментировать

в избранное ссылка отблагодарить

Email:
Пароль:
	забыли пароль?

Логин:
Email:
Пароль: