Форум программистов, компьютерный форум CyberForum.ru

Перевести из делфи в с++ - C++

Восстановить пароль Регистрация
 
KostyaMoscow
-1 / 2 / 0
Регистрация: 27.02.2013
Сообщений: 95
03.10.2013, 14:50     Перевести из делфи в с++ #1
В числовой последовательности ищется максимальный элемент и выводится его номер

var s,max:real;
i,k,n:integer;
c:extended;
begin
repeat
write('n = ');readln(n);
until n>=0;
max:=0;k:=0;
if n>0 then
begin
max:=5;k:=1;c:=1;
for i:=1 to n do
begin
c:=c*i;
s:=exp(ln(5)*i)/c;
if s>max then
begin
max:=s;
k:=i;
end;
end;
end;
writeln('max = ',max:0:4,', number = ',k);
readln
end.
Similar
Эксперт
41792 / 34177 / 6122
Регистрация: 12.04.2006
Сообщений: 57,940
03.10.2013, 14:50     Перевести из делфи в с++
Посмотрите здесь:

Аналог модуля Делфи в С++ C++
C++ переход с делфи на цпп
Перевод из делфи в с C++
Из Делфи в С++ C++
C++ Переход с делфи
После регистрации реклама в сообщениях будет скрыта и будут доступны все возможности форума.
l2ded
 Аватар для l2ded
80 / 68 / 11
Регистрация: 10.05.2011
Сообщений: 284
03.10.2013, 17:14     Перевести из делфи в с++ #2
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
#include <iostream>
 
typedef long double extended;
 
int main(void){
    double s,max;
    int i,k,n;
    extended c;
    max=n=k=0;
 
    do {
        std::cout<<"n=";
        std::cin>>n;
    } while(n<0);
 
    if (n>0){
    (max=5,c=k=1);
    for(i=1;i<=n;i++){
        c*=i;s=pow(5.,i)/c;
            if (s>max) (max=s;k=i);
    }
 
    }
std::cout<<"max="<<max<<", number="<<k<<std::endl;
return 0;
}
вроде похоже
WilFred
 Аватар для WilFred
31 / 26 / 3
Регистрация: 11.03.2012
Сообщений: 71
03.10.2013, 17:19     Перевести из делфи в с++ #3
KostyaMoscow,
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
#include <vcl.h>
//#include <math.h>
#include <iostream.h>
#pragma hdrstop
 
#include <tchar.h>
 
using namespace std;
 
//---------------------------------------------------------------------------
 
#pragma argsused
 
int _tmain(int argc, _TCHAR* argv[])
{
    float x, max, n, k=1;
    cout <<"Введите кол-во элементов последовательности: ";
    cin >> n;
    cout <<"Введите последовательность: ";
    cin >> max;
    for(int i=1; i<n; i++)
    {
        cin>>x;
        if(x>max)
        {
            max = x;
            k++;
        }
    }
 
    cout <<"Max = " << max << " его номер " << k << endl;
    system("PAUSE");
    return 0;
}
MrGluck
Ворчун
Эксперт С++
 Аватар для MrGluck
4919 / 2662 / 243
Регистрация: 29.11.2010
Сообщений: 7,399
03.10.2013, 17:33     Перевести из делфи в с++ #4
C++
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
#include <iostream>
#include <limits>
 
int main()
{
    int x, max = std::numeric_limits<int>::min(), max_number = 0, number = 0;
    while (std::cin >> x)
    {
        number++;
        if (x > max)
        {
            max = x;
            max_number = number;
        }
    }
    std::cout << "Max is " << max << " with number " << max_number << std::endl;
}
Yandex
Объявления
03.10.2013, 17:33     Перевести из делфи в с++
Ответ Создать тему
Опции темы

Текущее время: 01:04. Часовой пояс GMT +3.
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin® Version 3.8.9
Copyright ©2000 - 2016, vBulletin Solutions, Inc.
Рейтинг@Mail.ru