Rss
Виртуальный кабинет МАТЕМАТИКУС
Популярное
Календарь
«     2024    »
1234567
891011121314
15161718192021
22232425262728
2930 
Журнал "Математика"
Математика
Счетчик посещений
счетчик посещений
Flag Counter

Опросы
Оцените работу сайта
Лучший
Неплохой
Устраивает ... но ...
Встречал и получше
Совсем не понравился

Интернет с пользой
Интернет с пользой
  • Опуликовал: admin
  • |
  • Коментариев: 0
  • |
  • Просмотров: 400
Сумма квадратов цифр некоторого двухзначного числа на 1 больше утроенного произведения этих цифр. После деления этого двухзначного числа на сумму его цифр в частном получится 7 и в остатке 6. Составить алгоритм поиска этого числа.
РЕШЕНИЕ:
var i,i1,i2,a,a1,a2:integer;
begin
for i:=10 to 99 do
begin i1:=i div 10; i2:=i mod 10;
if i1*i1+i2*i2-1=3*i1*i2 then begin
a1:=i div (i1+i2); a2:=i mod (i1+i2);
if (a1=7) and (a2=6) then writeln (i);
end;
end;
end.
Скачать [334 b] ( 1)

Облако Тегов

{links}