Вычисление A^8 на Pascal
Здесь иллюстрируется использование промежуточных переменных и вычислений: без промежуточных вычислений мы бы потратили 7 умножений, а с промежуточными - всего 3.
Код на PascalABC.NET:
Код на PascalABC.NET:
var a: real;
begin
write('Введите a: ');
readln(a);
var a2,a4,a8: real; // вспомогательные переменные
a2 := a * a;
a4 := a2 * a2;
a8 := a4 * a4;
writeln(a,' в степени 8 = ',a8);
end.
10.02.2015, 08:43 -
Категория: Статьи » Программирование » Pascal
