Программа Pascal
Ввести число x и вывести третью, пятую и десятую степень этого числа и записать в переменную y (использовать оператор умножения минимальное количество раз)
Ввести число x и вывести третью, пятую и десятую степень этого числа и записать в переменную y (использовать оператор умножения минимальное количество раз)
More Questions From This User See All
Answers & Comments
Мы можем использовать оператор умножения всего один раз, получая очередную степень числа в цикле.
Код (Pascal)
var
x, st3, st5, st10, i, st: longint;
begin
read(x);
st:=1;
for i:=1 to 10 do
begin
st:=st*x;
if i=3 then st3:=st
else if i=5 then st5:=st;
end;
st10:=st;
writeln(st3, ' ', st5, ' ', st10);
end.
----------------------------------
Файл решения прикреплён.