Форум программистов, компьютерный форум, киберфорум
Наши страницы

С++ для начинающих

Войти
Регистрация
Восстановить пароль
 
Fbink
1 / 1 / 1
Регистрация: 19.07.2012
Сообщений: 114
#1

Программы pascal переписать под c++ - C++

31.07.2012, 18:35. Просмотров 340. Ответов 2
Метки нет (Все метки)

Всем доброго времени суток помогите переписать программы под c++

Условие Дано натуральное число n, и действительное число x. Вычислить.

Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
program laba3_1;     
uses crt;
var
x,s:real;
n,i:integer;
  begin 
     writeln('n,x=');
     readln(n,x);
     i:=n;
      s:=0;
      while(i>=1)do
        begin
          s:=s+exp(ln(x/2)*i);
          i:=i-1;
          end;
      writeln('s=',s:2:2);
      readln;
      end.
0
Изображения
 
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
Similar
Эксперт
41792 / 34177 / 6122
Регистрация: 12.04.2006
Сообщений: 57,940
31.07.2012, 18:35
Здравствуйте! Я подобрал для вас темы с ответами на вопрос Программы pascal переписать под c++ (C++):

Программы pascal переписать под c++ - C++
Всем доброго времени суток помогите переписать программы под c++ Условие Дано натуральное число n, и действительное число x....

Программы pascal переписать под c++ - C++
Доброго времени суток. вот последняя программа которую нужно сделать под c++ Я знаю парни я вам надоел уже :) Больше не буду вас...

Программу pascal переписать под c++ - C++
Всем доброго времени суток, прошу помощи у вас по скольку слабо разбераюсь в этой отрасли. program gth; Uses crt; ...

Программу Pascal переписать под c++ - C++
Всем доброго времени суток много увожаемые пользователи форума. Прошу помощи у вас, по скольку очень плохо владею языком c++ program...

Программу pascal переписать под c++ - C++
Напечатать в возрастающем порядке все числа от 100 до 999, в десятичной записи в которых нет одинаковых цифр. Var s:string; ...

Программу pascal переписать под c++ условные операторы - C++
Всем доброго времени суток помогите переписать программу под c++ program lolz; Var a,c,x,f:real Begin ...

2
DaskOFF
112 / 112 / 9
Регистрация: 02.05.2012
Сообщений: 524
Записей в блоге: 1
31.07.2012, 19:34 #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
27
28
29
30
#include <iostream>
 
double step(double q,int t)
{
    double res(0);
    if (t==0)
        return 1;
    return res=(q/2)*step(q,t-1);
 
}
int main()
{
    double x,s;
    int i,n;
 
    std::cout << "n,x = ";
    std::cin >>x >> n;
 
    i=n;
    s=0;
 
    while (i!=0) {
        s+= step(x, n);
        --i;
    }
    std::cout << s;
    system("pause");
 
    return 0;
}
1
Fbink
1 / 1 / 1
Регистрация: 19.07.2012
Сообщений: 114
31.07.2012, 19:50  [ТС] #3
Спасибо вам
0
MoreAnswers
Эксперт
37091 / 29110 / 5898
Регистрация: 17.06.2006
Сообщений: 43,301
31.07.2012, 19:50
Привет! Вот еще темы с ответами:

Переписать с Pascal на С++ - C++
Var f1,f2: File of Real; i,n,k: Integer; x,s: Real; BEGIN Write('Введите кол-во чисел: '); Readln(n); ...

Переписать с pascal на c++ - C++
const a=5.7;b0=2;bk=8;h=2;x3=30;b1=4;b2=6; begin writeln('k = ',(b0+5.6)+(b1+5.6)+(b2+5.6)+(bk+5.6)+(x3/7*5.7)); end.

Переписать код с Pascal - C++
я тут написал на паскале нужно на С++ uses crt; var a,b:integer; q:boolean; z:real; begin clrscr; ...

Переписать проги с Pascal на С++ - C++
Помогите. 1# Переварачивает число. uses crt; var a: word; begin clrscr; write('Vvedite 4rehzna4noe 4islo: '); readln(a); ...


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

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

КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin® Version 3.8.9
Copyright ©2000 - 2017, vBulletin Solutions, Inc.
Рейтинг@Mail.ru