Помогите перевести код с PASCAL на C++

@DMvel225 · Регистрация: 04.03.2016

Author24 — интернет-сервис помощи студентам

Вот код Pascal, как его перевести в C++ ?

Pascal

program integral;
var
n,i : integer;
a,b,shag,sum,itog : real;
function F(x:real):real;
begin
if x=0 then F:=1
else F:=x*x;
end;
begin
write('Начало интегрирования a = ');
readln(a);
repeat
write('Конец интегрирования b>',a:0:1,' b = ');
readln(b);
until b>a;
write('Количество разбиений интервала n = ');
readln(n);
shag:=(b-a)/n;
sum:=0;
for i:=1 to n-1 do
sum := sum + F(shag*i+a);
sum := sum + (F(a)+F(b))/2;
itog:=(b-a)/n * sum;
writeLn('Интеграл = ', itog:0:5)
end.

Комментарий модератора

Нарушение правил форума:
Запрещено создавать темы с бессмысленными названиями вроде "Помогите!", "Вопрос" и т.п.
Используйте теги кода для форматирования сообщения.

@nmcf · 06.05.2016, 12:05

C++

#include <iostream>
#include <iomanip>
 
using namespace std;
 
 
double F(double x)
{
    return x == 0 ? 1 : x * x;
}
 
int main()
{
    int n , i;
    double a, b, shag, sum, itog;
 
    cout << "Начало интегрирования a = ";
    cin >> a;
 
    do
    {
        cout << "Конец интегрирования b> " << fixed << setprecision(1) << a << " b = ";
        cin >> b;
    }
    while (b <= a);
 
    cout << "Количество разбиений интервала n = ";
    cin >> n;
 
    shag = (b - a) / n;
    sum = 0;
    for (i = 1; i <= n - 1) sum += F(shag * i + a);
    sum += (F(a) + F(b)) / 2;
    itog = (b - a) / n * sum;
 
    cout << "Интеграл = " << fixed << setprecision(5) << itog << endl;
}

	06.05.2016, 12:05

Помогите перевести код с PASCAL на C++

Решение