Предмет: Информатика,
автор: barabashka11
Составьте программы на Паскале для решения задач № 6-9 из заданий к § 34. При этом отмените ограничения на количество операций в арифметическом выражении, сформулированные в условиях задач.
Ответы
Автор ответа:
0
====================================
P.S. Не уверен насчёт наличия функции power(x: real; y: integer): real в Borland TB, посему вот, на всякий, мне времени не жалко, раз уж взялся х)
function power(x: real; y: integer): real;
var
i: integer;
d: real := 1;
begin
for i := 1 to y do
d := d * x;
result := d;
end;
P.S. Не уверен насчёт наличия функции power(x: real; y: integer): real в Borland TB, посему вот, на всякий, мне времени не жалко, раз уж взялся х)
function power(x: real; y: integer): real;
var
i: integer;
d: real := 1;
begin
for i := 1 to y do
d := d * x;
result := d;
end;
Приложения:
Интересные вопросы
Предмет: Русский язык,
автор: Arseniy2002
Предмет: Математика,
автор: anacmaciz
Предмет: Литература,
автор: rozzeta2000
Предмет: Алгебра,
автор: Аноним