Pascal. Сумма квадратов цифр некоторого двузначного числа на 1 больше утроенного произведения этих цифр. После деления этого двузначного числа на сумму его цифр в

частном получается 7 и в остатке 6. Составить цикл нахождения числа, если он существует.

Question

Информатика

Викторина

4 ноября, 01:22

Pascal. Сумма квадратов цифр некоторого двузначного числа на 1 больше утроенного произведения этих цифр. После деления этого двузначного числа на сумму его цифр в

частном получается 7 и в остатке 6. Составить цикл нахождения числа, если он существует.

+4

Ответы (1)

Знаете ответ?

Велизар · Answer 1

For i:=1 to 9 do

for j: = 0 to 9 do

if ((i*i+j*j-3*i*j=1) and ((i*10+j) div (i+j) = 7) and ((i*10+j) mod (i+j) = 7) then write ('Искомое число', i*10+j) ;

end.