var a,b:integer; begin write('a = '); readln(a); b:=round(sqrt(a)); if b*b=a then writeln('Yes, ',b,' * ',b,' = ',a) else writeln('No'); end.
Пример: a = 169 Yes, 13 * 13 = 169
более месяца назад
Ваш ответ:
Вы можете из нескольких рисунков создать анимацию (или целый мультфильм!). Для этого нарисуйте несколько последовательных кадров
и нажмите кнопку Просмотр анимации.
