Для целого k найти 2^k

@Alba · Регистрация: 12.01.2015

Author24 — интернет-сервис помощи студентам

Ребят,если Вам не сложно не могли бы подсказать как сделать в DosBox такие вот вещи:
1.для натуральных m n k посчитать 2^k+ 3^m + 5^n (^ возведение в степень)
2.для целого k найти 2^k
3. для целых m n k посчитать 2^k+ 3^m + 5^n

заранее спасибо)))

@WolfCF · 15.01.2010, 11:13

Сообщение от Alba

для целого k найти 2^k

Pascal

var k:integer;
begin
writeln('vvedite k');
readln(k);
k:=sqr(k);
writeln(k);
readln;
end.

Добавлено через 4 минуты

Сообщение от Alba

для целых m n k посчитать 2^k+ 3^m + 5^n

Pascal

var a,k,m,n:integer;
begin
writeln('vv k');readln(k);
writeln('vv m');readln(m);
writeln('vv n');readln(n);
a:=sqr(k)+sqr(m)*m+n*n*n*n*n;
writeln(a);
readln
end.

@vad2211 · 15.01.2010, 11:39

аналог

Pascal

1	a:=sqr(k)+sqr(m)m+sqr(sqr(n))n

Добавлено через 1 минуту
еще можно попробовать с помощью exp(x*ln(n)) (как-то так), но я точно не помню как правильно с помощью экспозиции в степень возводить.

@WolfCF · 15.01.2010, 11:45

Сообщение от vad2211

(sqr(n))*n

еще один квадрат забыл

@Puporev · 15.01.2010, 11:48

Wolf, 2^k это не квадрат, это

Pascal

1
2
3

p:=2;
for i:=1 to k
do p:=p*2;

@vad2211 · 15.01.2010, 11:48

Да нет, не забыл, там написано "sqr(sqr(n))*n".

@WolfCF · 15.01.2010, 11:55

Puporev, не внимательно прочитал.

Не по теме:

как всегда....

@Inadequate · 15.01.2010, 12:12

Wolf, вот это 2^k можно написать и короче и правильней

Pascal

var
  k:longint;
begin
  readln(k);
  writeln(exp(ln(2)*k))
end.

@Alba 1 / 1 / 0 Регистрация: 12.01.2015 Сообщений: 4
		1
	Для целого k найти 2^k 15.01.2010, 09:18. Показов 634. Ответов 7 Метки нет (Все метки) Ребят,если Вам не сложно не могли бы подсказать как сделать в DosBox такие вот вещи: 1.для натуральных m n k посчитать 2^k+ 3^m + 5^n (^ возведение в степень) 2.для целого k найти 2^k 3. для целых m n k посчитать 2^k+ 3^m + 5^n заранее спасибо))) 0

@WolfCF 3310 / 1372 / 110 Регистрация: 28.04.2009 Сообщений: 4,822
	15.01.2010, 11:45	4
	Сообщение от vad2211 (sqr(n))*n еще один квадрат забыл 0

@vad2211 119 / 119 / 41 Регистрация: 21.12.2009 Сообщений: 194
	15.01.2010, 11:48	6
	Да нет, не забыл, там написано "sqr(sqr(n))*n". 0

@WolfCF 3310 / 1372 / 110 Регистрация: 28.04.2009 Сообщений: 4,822
	15.01.2010, 11:55	7
	Puporev, не внимательно прочитал. Не по теме: как всегда.... 0

	15.01.2010, 12:12