0 / 0 / 0
Регистрация: 22.11.2015
Сообщений: 56
1

Перевод с Паскаля в С++

27.03.2016, 12:45. Показов 502. Ответов 5
Метки нет (Все метки)

Author24 — интернет-сервис помощи студентам
Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
uses crt;
function rec(n:integer):real;
var z:integer;
begin
z:=1;
if n=0 then
 begin
  z:=1;
  rec:=1
 end
else
 begin
  z:=-z;
  rec:=rec(n-1)+z/(2*n);
 end;
end;
var n:integer;
begin
clrscr;;
write('n=');
readln(n);
write('s=',rec(n):0:5);
readln
end.

Помогите его перевести в код С++
0
Programming
Эксперт
94731 / 64177 / 26122
Регистрация: 12.04.2006
Сообщений: 116,782
27.03.2016, 12:45
Ответы с готовыми решениями:

Перевод кода с Паскаля (перевод в метры)
var a,b,d:integer; c,e:real; begin writeln('1-дециметр 2-километр'); writeln('3-метр ...

Перевод с Паскаля в си
Всем привет! Прошу , пожалуйста помогите этот замечательный код перевести в си язык. const n...

Перевод из Паскаля в С
uses crt; var a,b,c,d:byte; begin clrscr; repeat writeln('Положение коня:');...

Перевод с паскаля
var x,y:real; o1,o2,o3:boolean; begin Readln(x,y); o1:=(y<=7) and (y>=1) and...

5
Объявлятель переменных
1220 / 406 / 320
Регистрация: 24.09.2011
Сообщений: 1,265
27.03.2016, 12:55 2
C++
1
2
3
4
5
6
7
8
9
10
11
12
#include <iostream>
 
double rec(int n) {
    return (n ? rec(n-1)-1/(2.0*n) : 1);
}
 
int main()
{
    int n;
    std::cout << "n = "; std::cin >> n;
    std::cout << "s = " << rec(n);
}
Я не очень понял, что должна выдать функция rec, но вроде бы я верно всё переписал.
0
181 / 47 / 33
Регистрация: 27.02.2016
Сообщений: 260
27.03.2016, 13:01 3
Держи:
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 "stdafx.h"
#include <iostream> 
 
using namespace std;
 
float rec(int n)
{
    int z=1;
    if (n == 0)
    {
        z = 1;
        return 1;
    }
    else
    {
        z = -z;
        return rec(n - 1) + z / (2 * n);
    }
}
 
int main()
{
    int n;
    cout << "n=";
    cin >> n;
    cout << "s=" << rec(n);
    return 0;
}
0
Модератор
Эксперт С++
13507 / 10757 / 6412
Регистрация: 18.12.2011
Сообщений: 28,712
27.03.2016, 13:34 4
Lost17, В паскале операция деления int/int дает действительный результат.
В С++ - целочисленный. В связи с этим обратите внимание на z/(2*n)
0
181 / 47 / 33
Регистрация: 27.02.2016
Сообщений: 260
27.03.2016, 13:53 5
zss, Согласен, 17-ая строка должна иметь следующий вид:
C++
1
return rec(n - 1) + float(z) / float(2 * n);
0
0 / 0 / 0
Регистрация: 22.11.2015
Сообщений: 56
28.03.2016, 11:37  [ТС] 6
Спасибо
0
28.03.2016, 11:37
IT_Exp
Эксперт
87844 / 49110 / 22898
Регистрация: 17.06.2006
Сообщений: 92,604
28.03.2016, 11:37
Помогаю со студенческими работами здесь

Перевод с паскаля
uses crt ; const nmax = 100; var b : array of real ; n ,i , j : integer; x :real ; begin...

перевод с Паскаля
Надо перевести: program zz; var n,m:integer; i,j,g,z,bilkol:integer; d1,d2:text; ...

Перевод с Паскаля на С++
Помогите переделать с Паскаля на С++. 1)Вывести максимальное число из файла in.txt. Листинг:...

Перевод из Паскаля на С++
Привет всем. Нужна помощь. У меня есть алгоритм на Паскале, а нужен на С++, поскольку Паскаль знаю...


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

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

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