1 / 1 / 1
Регистрация: 20.11.2016
Сообщений: 31
1

Функцию которая определяет, является ли натуральное число N степенью числа 5. Перевести с Pascal

05.06.2017, 17:37. Показов 3928. Ответов 11
Метки нет (Все метки)

Нужно перевести функцию которая определяет, является ли натуральное число N степенью числа 5. Если N - степень пятёрки, то функция возвращает показатель этой степени, иначе функция выдаёт ответ -1.
Pascal
1
2
3
4
5
6
7
8
9
function degree5(N: integer): integer; {N>=1}
 var k: integer;
begin if N=1 then degree5:=0 else 
 if N mod 5 <> 0 then degree5:= -1 else 
 begin k:=degree5(N div 5);
 if k=-1 then degree5:=-1
 else degree5:=k + 1
 end
end;
__________________
Помощь в написании контрольных, курсовых и дипломных работ, диссертаций здесь
0
Programming
Эксперт
94731 / 64177 / 26122
Регистрация: 12.04.2006
Сообщений: 116,782
05.06.2017, 17:37
Ответы с готовыми решениями:

Дано натуральное число n. Определите, является ли оно степенью числа 2, и если является, то выведите значение этой степени
Дано натуральное число n. Определите, является ли оно степенью числа 2, и если является, то...

Определить, является ли натуральное число k степенью числа
2. Составить программу для определения, является ли натуральное число k степенью числаВнимательнее...

Определить, является ли натуральное число k степенью некоторого числа
составить программу для определения, является ли натуральное число k степенью некоторого числа

Определить, является ли натуральное число степенью другого числа
Помогите написать программу используя while или do...while. : Составить программу для...

11
Software Developer
315 / 229 / 113
Регистрация: 03.05.2017
Сообщений: 1,306
05.06.2017, 20:13 2
Pascal знаю плохо, поэтому написал может быть по другому
C++
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
#include <iostream>
#include <cmath>
#include <conio.h>
 
using namespace std;
 
float func (int N)
{
    for (float i = 0; i < 200; i ++)
         if (pow (5, i) == N)
              return i;
    return -1;
}
 
int main ()
{
    int N;
    cout << "Vvedite N: ";
    cin >> N;
    //cout << (func (N) == -1 ? "no" : "yes");
    float k = func (N);
    if (k == -1)
         cout << "no";
    else
         cout << k;
    _getch ();
    return 0;
}
0
Диссидент
Эксперт C
26839 / 16746 / 3670
Регистрация: 24.12.2010
Сообщений: 37,492
05.06.2017, 20:28 3
C++
1
2
3
4
5
6
7
8
9
10
11
int degree5(int N)
{
int k = 0;
while(N) {
  if (N==1) return k;
  if (N%5) break;
  k++;
  N  /= 5; 
}
return -1;
}
Spoki, Правда, у вас функция рекурсивная. А я предложил нерекурсивный вариант.
decrement, Задача явно целочисленная. И целые числа компьютер считает очень хорошо. Зачем же ее выводить в другие области, где компьютер считает не очень хорошо? И особенно "любит" сравнение на равенство типов double, float.
И еще объясните, пожалуйста, смысл " i < 200". Сколько будет 5199 вы примерно представляете?
0
Software Developer
315 / 229 / 113
Регистрация: 03.05.2017
Сообщений: 1,306
05.06.2017, 20:35 4
Байт, ну да, извиняюсь за выражение, но я явно написал хрень с точки зрения программирования)) но я новичок в этом деле и пришел на этот форум для того что бы развиваться в области программирования.
0
Диссидент
Эксперт C
26839 / 16746 / 3670
Регистрация: 24.12.2010
Сообщений: 37,492
05.06.2017, 20:45 5
Цитата Сообщение от decrement Посмотреть сообщение
пришел на этот форум для того что бы развиваться в области программирования.
Ну так для того мы вас и поправляем в меру своих сил.
Удачи!
0
Software Developer
315 / 229 / 113
Регистрация: 03.05.2017
Сообщений: 1,306
05.06.2017, 20:56 6
Цитата Сообщение от Байт Посмотреть сообщение
Ну так для того мы вас и поправляем в меру своих сил.
Ну да, критика в программировании от опытных всегда важна и только приветствуется.
Цитата Сообщение от Байт Посмотреть сообщение
Удачи!
Спасибо
0
703 / 525 / 301
Регистрация: 24.02.2017
Сообщений: 1,876
05.06.2017, 21:24 7
C++
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
#include <iostream>
 
using namespace std;
 
 int degree5(int N)
   {
    int power =0,namber=1;
    if(N==1)
     return 0;
    while(namber<=N)
     {power++;
     namber*=5;
     if(N==namber)
      return power;
      }
 
      if(N!=namber)
       return -1;
      };
int main()
{
   int N,power;
 
    cin>>N;
 
    cout<< degree5(N);
 
 
    system("pause>NULL");
    return 0;
}
0
Диссидент
Эксперт C
26839 / 16746 / 3670
Регистрация: 24.12.2010
Сообщений: 37,492
05.06.2017, 21:33 8
повар1, понял. Вы идете с другого конца. Однако, это менее эффективно.
Впрочем, интересны любые подходы. Хотя бы для их сравнения.
0
Рэмбо комнатный
103 / 103 / 99
Регистрация: 05.03.2017
Сообщений: 510
05.06.2017, 23:40 9
вот такой вот я способ сделал, без ограничений всяких (помимо ограничений самого типа есесена)
C++
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
#include <iostream>
 
using namespace std;
 
bool Check(int n)
{
    int k = 1;
    while (k < n)
    {
        k *= 5;
    }
    if (k == n)
    {
        return true;
    }
    else
    {
        return false;
    }
}
 
int main()
{
    int n; cin >> n;
    if (Check(n))
    {
        cout << "yes";
    }
    else
    {
        cout << "no";
    }
    system("pause");
    return 0;
}
0
Диссидент
Эксперт C
26839 / 16746 / 3670
Регистрация: 24.12.2010
Сообщений: 37,492
06.06.2017, 12:13 10
Цитата Сообщение от GeFacle Посмотреть сообщение
вот такой вот я способ сделал,
не дочитав условия
Цитата Сообщение от Spoki Посмотреть сообщение
функция возвращает показатель этой степени

А так очень похоже на реализацию уважаемого повар1, критику которой смотри в посте 8
0
Рэмбо комнатный
103 / 103 / 99
Регистрация: 05.03.2017
Сообщений: 510
06.06.2017, 14:57 11
а, ну тогда вот поправочка
C++
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
#include <iostream>
 
using namespace std;
 
int Count(int n)
{
    int k=1; 
    int count=1;
    while(k!=n) { k*=5; count++; } 
    return count;
}
 
bool Check(int n)
{
    int k = 1;
    while (k < n)
    {
        k *= 5;
    }
    if (k == n)
    {
        return true;
    }
    else
    {
        return false;
    }
}
 
int main()
{
    int n; cin >> n;
    if (Check(n))
    {
        cout << "yes" << Count(n);
    }
    else
    {
        cout << "no";
    }
    system("pause");
    return 0;
}
0
Диссидент
Эксперт C
26839 / 16746 / 3670
Регистрация: 24.12.2010
Сообщений: 37,492
06.06.2017, 21:53 12
Цитата Сообщение от GeFacle Посмотреть сообщение
вот поправочка
Код, скорее всего, рабочий. Детально не проверял, но верю. Но уж больно нелепый. Одни и те же действия повторять... Советую ознакомиться с другими подходами.
Вы можете сказать, что для такой ерундовой задачки и выеживаться особо не стоит. Может быть. Но имхо, стоит приучать себя сразу, даже в такой ерунде, находить решения пооптимальнее. Тем более, что в данном случае оно и короче, и понятнее.
0
IT_Exp
Эксперт
87844 / 49110 / 22898
Регистрация: 17.06.2006
Сообщений: 92,604
06.06.2017, 21:53
Помогаю со студенческими работами здесь

Составить программу, которая определяет, является ли заданное натуральное число палиндромом
Палиндром — это сочетание символов, которые читаются одинаково в прямом и обратном направлениях....

Написать рекурсивную функцию, которая определяет, является ли число числом Фибоначчи
Microsoft Visual C++ Написать рекурсивную функцию которая определяет, является ли число, числом...

Создайте логическую функцию, которая принимает в качестве аргумента целое число и проверяет, является ли оно степенью двойки
4. Создайте логическую функцию, которая принимает в качестве аргумента целое число и проверяет,...

В целочисленном массиве найти и напечатать те элементы, которые являются степенью 2. Написать функцию, проверяющую, является ли число степенью 2.
В целочисленном массиве найти и напечатать те элементы, которые являются степенью 2. Написать...


Искать еще темы с ответами

Или воспользуйтесь поиском по форуму:
12
Ответ Создать тему
Опции темы

КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2022, CyberForum.ru