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

Перевести код с языка Pascal на язык С++

26.11.2016, 01:10. Показов 1228. Ответов 2
Метки нет (Все метки)

Студворк — интернет-сервис помощи студентам
Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
var i,n,a:integer;
    rez:integer;
begin
  Write('Enter digit A = ');readln(a);
  Write('Enter count = ');readln(n);
  rez:=1;
  for i := 1 to n-1 do
    begin
      rez:=rez*(a+i-1);
    end;
    writeln('Result = ',rez);
  readln;
end.
0
Лучшие ответы (1)
Programming
Эксперт
94731 / 64177 / 26122
Регистрация: 12.04.2006
Сообщений: 116,782
26.11.2016, 01:10
Ответы с готовыми решениями:

Перевести код с языка Pascal на язык C++
Необходимо переписать данный код на C++. const eps = 1e-4; function pow(x : Real; k : Integer)...

Перевести код с языка Pascal
Нужно сделать точно такую же программу (она была написана на питоне и переведена на паскаль) на...

Перевести программу с языка Паскаль в язык С++
Имееться задача на Pascale: {Метод Ньютона решения нелинейного уравнения} program Newton; uses...

Нужно перевести на язык Pascal
Помогите перевести на язык Pascal, заранее благодарен! struct PRICE { char tovar; char mag;...

2
15 / 15 / 15
Регистрация: 20.08.2016
Сообщений: 51
26.11.2016, 01:32 2
Лучший ответ Сообщение было отмечено Crayzor как решение

Решение

C++
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
#include<iostream>
using namespace std;
 
int main()
{
    int a, n;
    cout << "Enter digit A = "; cin >> a;
    cout << "Enter count = ";   cin >> n;
 
    int rez = 1;
    for (int i = 1; i < n - 1; ++i)
        rez = rez * (a + i -1);
 
    cout << "Result = " << rez << endl;
    return 0;
}
0
7533 / 6396 / 2916
Регистрация: 14.04.2014
Сообщений: 27,859
26.11.2016, 13:33 3
C++
1
rez *= a + i - 1;
0
IT_Exp
Эксперт
87844 / 49110 / 22898
Регистрация: 17.06.2006
Сообщений: 92,604
26.11.2016, 13:33
Помогаю со студенческими работами здесь

Перевести с Borland Pascal на язык С++
Помогите пожалуйста )))) uses Crt; const n=16; x=0.5; p:array of...

Максимальный и минимальный элементы массива (перевести из языка Pascal в СИ)
Помогите перевести из языка Pascal в СИ: var a: array of integer max,min,i,k:integer; begin...

Не получается переложить код с языка C# на язык С
Подскажите пожалуйста, как переложить этот код на язык С using System; using...

Перевести код на язык С++
#include &lt;stdio.h&gt; #include &lt;string.h&gt; int main(void) { printf(&quot;Enter of string: &quot;); ...


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

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

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