составьте на паскале программу возведения в N-ую степень целого числа X.
5-9 класс
|
Program Multy;
var i, n, x, mt:integer;
begin
write('введите целое число X ');
readln(x);
write('введите степень N ');
readln(n);
mt:=x;
for i:=1 to (n-1) do
begin
mt:=mt*x;
end;
writeln(x,' в степени ',n,' равно ',mt);
end.
program power;
var i, n, x, res:integer;
begin
readln(x, n);
res:=x;
for i:=1 to (n-1) do
begin
res:=res*x;
end;
writeln(res);
end.
Другие вопросы из категории
просмотрела)). 5 строчек хватит
юристом. Один полюбил туризм, другой бег, страсть третьего — регби.Юра сказал, что на туризм ему не хватает времени, хотя его сестра — единственный врач в семье, заядлый турист. Врач сказал, что он разделяет увлечение коллеги.Забавно, но у двоих из друзей в названиях их профессий и увлечений не встречается ни одна буква их имен.Определите, кто чем любит заниматься в свободное время и у кого какая профессия.
они были созданы (про способы). 3) + и - .
Читайте также
амеба каждые 3 часа делиться на 2 клетки. Определить, сколько амеб будет через 3,6,9,12 и 24 часа.
3) дано натуральное числоо N и действительное число Х. Вычислить сумму ряда sin(x)+sin(2x)+sin(3x)+...+sin(Nx).
4) написать программу для вычисления n-ой степени числа А.
помогите, пожалуйста)
логических операций. Программа должна иметь дружественный интерфейс.
единиц каждого вида товара соответственно. Составьте на Паскале программу вычисления общей стоимости всех покупок.
(ввод данных осуществляться в режиме диалога).