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

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

Войти
Регистрация
Восстановить пароль
 
assasin21rus
2 / 2 / 1
Регистрация: 02.04.2014
Сообщений: 93
#1

Перевод кода с Pascal - C++

02.07.2014, 08:35. Просмотров 284. Ответов 7
Метки нет (Все метки)

Pascal
1
2
3
4
5
6
7
8
9
10
11
const p=1;
const x=2.1;
var t,a,b,y:real;
begin
write('t=');
readln(t);
b:=sin(p*p)+Power(x,3);
a:=Power(exp(1), sqrt(abs(x)));
y:=Power(a,3)/Power(b,2);
write('y=',y)
end.
Similar
Эксперт
41792 / 34177 / 6122
Регистрация: 12.04.2006
Сообщений: 57,940
02.07.2014, 08:35     Перевод кода с Pascal
Посмотрите здесь:

Перевод кода с Pascal - C++
uses crt; const n = 17; var arr: array of integer; sum: integer; i: byte; k,d,e: integer; begin

Перевод кода с Pascal в C++ - C++
ребятки, помогите с переводом с паскаля на C++ данный код var n,s,t,n1,kk,e1,x,i,ss,h:integer; ///возводит x в степнь e1 по...

Перевод кода с с Pascal на С++ - C++
Совсем не знаю язык Pascal, а нужно перевести кусочек кода с этого языка на С++. Помогите, пожалуйста! Задан текст. По правилам...

Перевод кода из Pascal в C++ - C++
Нужна ваша помощь в переводе с паскаля ибо не особо знаком с конструкциями си. Код в паскале: Program Princip_Guigensa_Frenelya; uses...

Перевод кода с Pascal - C++
var k,n,m:integer; x,s,p,t:real; begin repeat write('x<>0 x=');{х в знаменателе, исключаем заведомое деление на 0} readln(x);...

перевод кода из Pascal в C++ - C++
помогите, пожалуйста, перевести этот код в C++ :impossible: program chisla; uses Crt; const n = 5; var y: real; flag:...

После регистрации реклама в сообщениях будет скрыта и будут доступны все возможности форума.
SatanaXIII
Супер-модератор
Эксперт С++
5594 / 2628 / 240
Регистрация: 01.11.2011
Сообщений: 6,469
Завершенные тесты: 1
02.07.2014, 10:57     Перевод кода с Pascal #2
C++
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
#include <math>
#include <iostream>
 
int main()
{ //begin
const p = 1; //const p=1;
const x = 2.1; //const x=2.1;
float t, a, b, y; //var t,a,b,y:real;
 
std::cout << "t="; //write('t=');
std::cin >> t; //readln(t);
b = sin(p*p) + pow(x, 3); //b:=sin(p*p)+Power(x,3);
a = pow( exp(1), sqrt(abs(x)) ); //a:=Power(exp(1), sqrt(abs(x)));
y = pow(a, 3)/pow(b, 2); //y:=Power(a,3)/Power(b,2);
std::cout << "y=" << y; //write('y=',y)
 
std::cin.ignore(2);
return 0;
} //end.
JavaUser
69 / 69 / 15
Регистрация: 06.10.2013
Сообщений: 302
02.07.2014, 11:08     Перевод кода с Pascal #3
Вот ваша программа на с++
C++
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
#include <iostream>
#include <cmath>
using namespace std;
int main(void)
{
    const float p=1,x=2.1;
    double t=0,a=0,b=0,y=0;
    cout<<"t=";
    cin>>t;
    b=sin(p*p)+pow(x,3);
    a=pow(exp(1),sqrt(abs(x)));
    y=pow(a,3)/pow(b,2);
    cout<<"Y="<<y;
    cin.get();
    return 0;
}
Kerry_Jr
Модератор
Эксперт PHP
2168 / 1964 / 685
Регистрация: 14.05.2014
Сообщений: 5,747
Записей в блоге: 1
Завершенные тесты: 5
02.07.2014, 11:13     Перевод кода с Pascal #4
Цитата Сообщение от JavaUser Посмотреть сообщение
a=pow(exp(1),sqrt(abs(x)));
А почему не
C++
1
a = exp(sqrt(fabs(x)));
?
JavaUser
69 / 69 / 15
Регистрация: 06.10.2013
Сообщений: 302
02.07.2014, 11:26     Перевод кода с Pascal #5
Цитата Сообщение от Kerry_Jr Посмотреть сообщение
А почему не
Хмм. fabs используется в Си.
Но! в С++ (а не Си) abs имеет много перегруженных эквивалентов. Так что так тоже можно
Kerry_Jr
Модератор
Эксперт PHP
2168 / 1964 / 685
Регистрация: 14.05.2014
Сообщений: 5,747
Записей в блоге: 1
Завершенные тесты: 5
02.07.2014, 11:32     Перевод кода с Pascal #6
JavaUser, Я не fabs или abs имел в виду, меня больше интересует зачем вызывать pow(exp(1), sqrt...), если можно epx(sqrt...). Или я ошибаюсь?
JavaUser
69 / 69 / 15
Регистрация: 06.10.2013
Сообщений: 302
02.07.2014, 11:43     Перевод кода с Pascal #7
Цитата Сообщение от Kerry_Jr Посмотреть сообщение
Я не fabs или abs имел в виду, меня больше интересует зачем вызывать pow(exp(1), sqrt...), если можно epx(sqrt...). Или я ошибаюсь?
можно вот так написать:
C++
1
a=pow(M_E,sqrt(abs(x)));
где М_Е - константа e, так как ехр(1)=е.
MoreAnswers
Эксперт
37091 / 29110 / 5898
Регистрация: 17.06.2006
Сообщений: 43,301
02.07.2014, 11:50     Перевод кода с Pascal
Еще ссылки по теме:

Перевод кода с Pascal - C++
Const n=5;m=10; var b:arrayof integer; i,j,k,buf,l:integer; begin for i:=1 to n do begin writeln; ...

Перевод кода из Pascal/VB в C++ - C++
Помогите пожалуйста перевести код в С++. Сдавать уже скоро, и я никак не приложу ума как это все сотворить в С++ uses crt; ...

Перевод кода с Pascal - C++
var k,i,n,c:integer; p,w:real; begin write('k&gt;-3 k='); readln(k); w:=0; c:=1; for i:=-3 to k do begin ...

Перевод кода с Pascal на С++ - C++
uses crt; function Summ(n:longint):byte; var m:longint; s:byte; begin s:=0; m:=n; while m&gt;0 do begin s:=s+m mod...


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

Или воспользуйтесь поиском по форуму:
Kerry_Jr
Модератор
Эксперт PHP
2168 / 1964 / 685
Регистрация: 14.05.2014
Сообщений: 5,747
Записей в блоге: 1
Завершенные тесты: 5
02.07.2014, 11:50     Перевод кода с Pascal #8
Цитата Сообщение от JavaUser Посмотреть сообщение
ехр(1)=е

Не по теме:

Вот это я и имею в виду: раз уж exp(1) = e, то по логике вещей exp(sqrt(abs(x))) = pow(exp(1), sqrt(abs(x))).

Yandex
Объявления
02.07.2014, 11:50     Перевод кода с Pascal
Ответ Создать тему
Опции темы

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