Начало
ввод числа
последняя цифра числа 0?
да нет ->Нельзя
Можно
Конец
Несложно заметить, что по столбцам значения увеличиваются с каждой строкой на 11. Также несложно заметить, то по строке с каждым столбцом значение уменьшается на 10.
Многоточием отмечены еще три столбца.
Для каждой ячейки верна формула a[I,j]=11(I-1)-10(j-1) i=1..7, j=1..7
Http://ru.calameo.com/books/0030957477988df8779b5
Function power (a:real; n:longint):real;
var
i:longint;
p:real;
begin
if n=0 then power:=0
else begin
p:=a;
for i:=2 to n do p:=p*a;
power:=p
end
end;
var
a:real;
n:integer;
begin
Write('Введите основание и показатель степени: ');
Read(a,n);
Writeln('Результат: ',power(a,n))
end.
<u>Пример</u>
Введите основание и показатель степени: 13.64 6
Результат: 6440005.25769131
Модель – это условный или мыслимый образ объекта (предмета, явления, процесса), который используется в определенных условиях в качестве его представителя («заместителя») и отражает его свойства и взаимосвязи.<span>Моделирование – это процесс исследования объекта познания на его модели.</span>