Предмет: Информатика,
автор: Interdust
Pascal abc.net
Двузначное число втрое больше суммы своих цифр, а квадрат этой суммы равен
утроенному первоначальному числу. Найдите это число.
Ответы
Автор ответа:
0
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.
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.
Похожие вопросы
Предмет: Математика,
автор: Аноним
Предмет: История,
автор: mikisou124
Предмет: Английский язык,
автор: Аноним
Предмет: Математика,
автор: наташа76
Предмет: Алгебра,
автор: anisimowa31051995