Какое трехзначное число равно кубу цифры его единиц , а также квадрату числа, составленного из его второй и первой цифры написать через цикл while.

Загадака Загадака    1   04.10.2019 17:10    3

Ответы
Stupidpeoplenamber1 Stupidpeoplenamber1  09.10.2020 20:04

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.

ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика