Pascal abc.net двузначное число втрое больше суммы своих цифр, а квадрат этой суммы равен утроенному первоначальному числу. найдите это число.

temik25527 temik25527    3   05.07.2019 01:50    0

Ответы
romannikodov romannikodov  02.10.2020 20:20
Var s,d,f,g,i:integer;
begin
for i:=10 to 99 do begin
s:= i div 10;d:= i mod 10;
f:= s+d;
if (i*3 > f) and (sqr(f) = 3*s) then writeln(i);end;end.
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика