По разделам



Задача While 10


Дано целое число N (> 1). Найти наибольшее целое число K, при
котором выполняется неравенство 3K < N.

Код (C/C++)

#include <bits/stdc++.h>
using namespace std;

int main() {
	srand((int)time(0));
	int N = rand() % 1000 + 2;
	//N = 81;
	cout << "N = " << N << endl;
	
	int K = 0, P =1;		
	while(P < N) {
		P *= 3;
		K += 1;
	}
	K -= 1;
		
	cout << "K = " << K << endl;
	cout << "3^K = " << pow(3,K) << endl;
	cout << "3^(K+1) = " << pow(3,K+1) << endl;

	return 0;
}

Код (Python)

import random

N = random.randrange(2,10000)
#N = 100
print('N = ', N)

K = 0
P = 1
while P < N:
    P *= 3
    K += 1
K -= 1
print("K = {0}, 3^K = {1}, 3^(K+1) = {2}".format(K,3**K,3**(K+1)))
									

Код (Pascal)

program While10;
var
  N,K,Temp :Integer;
begin
  Write('Введите N: ');
  Readln(N);
  K:=0;
  Temp:=3;
  while Temp
									




While. Абрамян
While 1 Просмотров: 20
While 2 Просмотров: 15
While 3 Просмотров: 12
While 4 Просмотров: 20
While 5 Просмотров: 14
While 6 Просмотров: 14
While 7 Просмотров: 10
While 8 Просмотров: 9
While 9 Просмотров: 12
While 10 Просмотров: 12
While 11 Просмотров: 16
While 12 Просмотров: 43
While 13 Просмотров: 9
While 14 Просмотров: 14
While 15 Просмотров: 15
While 16 Просмотров: 15
While 17 Просмотров: 12
While 18 Просмотров: 15
While 19 Просмотров: 12
While 20 Просмотров: 22
While 21 Просмотров: 17
While 22 Просмотров: 15
While 23 Просмотров: 17
While 24 Просмотров: 11
While 25 Просмотров: 12
While 26 Просмотров: 9
While 27 Просмотров: 10
While 28 Просмотров: 11
While 29 Просмотров: 11
While 30 Просмотров: 9

Комментарии

Чтобы написать комментарии вам нужно войти в систему или зарегистрироваться