program kratnist;
var i,s,a,b: integer;
begin
for i:=10 to 99 do
begin
a:=i div 10;
b:=i mod 10;
s:=sqr(a)+sqr(b);
if s mod 9=0 then writeln (i);
end;
readln
end.
Головна | Реєстрація | Вхід | RSS | Неділя, 07.13.2025, 10:27 AM |
Довідник для учнів та студентів | |
Вітаю Вас Гость |
|
Двозначні числа, сума квадратів яких кратна 9 |
|
Guide-for-students © 2025 |
Створити безкоштовний сайт на uCoz |