Какое трехзначное число равно кубу цифры его единиц , а также квадрату числа, составленного из его второй и первой цифры?Прошу написать через цикл While.
More Questions From This User See All
Copyright © 2024 SCHOLAR.TIPS - All rights reserved.
Answers & Comments
var a:integer;
begin
a:=100;
while (a mod 10 * a mod 10 * a mod 10 <> a) and (sqr(a div 100 + (a div 10 mod 10) * 10)<>a) do a:=a+1;
writeln(a);
end.