Переписать код с паскаль на С++

@vetal45 · Регистрация: 18.12.2014

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

это 1

Pascal

program 1;
var a,b:array of real;
i,n:integer;
begin
readln(n);
setlength(a,n);
setlength(b,n);
for i:=0 to n-1 do begin
read(a[i]);
b[i]:=a[i]/(i+1);
end;
for i:=0 to n-1 do
write(b[i],' ');
end.

это 2

Pascal

program 2;
var
  x,y: real;
begin
x:=0.1;
while x<=0.6 do
begin
 y :=sqrt (exp(2.2*x))-abs(sin((pi*x)/(x+2.3)))+1.7 ;
 writeln('y=',y);
 x:=x+0.1;
 end;
 readln;
end.

@Max Dark · 18.12.2014, 09:17

1)

C++

#include <iostream>
#include <vector>
 
int main () {
    std::vector<double> a, b;
    int i,n;
 
    std::cin >> n;
    a.resize(n);
    b.resize(n);
    for(i = 0; i < n; ++i) {
        std::cin >> a[i];
        b[i] = a[i]/double(i + 1);
    }
    for(i = 0; i < n; ++i)
        std::cout << b[i] << ' ';
    return 0;
}

2)

C++

#include <iostream>
#include <cmath>
 
static const double pi = 2.0*acos(0);
 
int main() {
    double y, x = 0.1;
    while (x <=0.6) {
        y = sqrt(exp(2.2*x))-abs(sin((pi*x)/(x+2.3)))+1.7;
        std::cout << "y = " << y << std::endl;
        x += 0.1;
    }
    std::cin.get();
    return 0;
}

@vetal45 · 20.12.2014, 18:54 **[ТС]**

Спасибо большое.

@vetal45 0 / 0 / 0 Регистрация: 18.12.2014 Сообщений: 4
	20.12.2014, 18:54 [ТС]	3
	Спасибо большое. 0

Опции темы

Переписать код с паскаль на С++

Решение