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

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

Войти
Регистрация
Восстановить пароль
 
SoulCub
0 / 0 / 0
Регистрация: 11.11.2012
Сообщений: 7
#1

Перевод из Pascal в C++ - C++

14.11.2012, 17:58. Просмотров 624. Ответов 2
Метки нет (Все метки)

Пж помогите перевести

Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
Program SoulCub;
Var
  A,B,C:Real;
Begin
  WriteLn('Введите числa A,B и C: ');
  ReadLn(A,B,C);
  If (A < B) And (B < C) Then
    Begin
      A := A * 2;
      B := B * 2;
      C := C * 2;
    End
  Else
    Begin
      A := -A;
      B := -B;
      C := -C;
    End;
  WriteLn('A = ',A,' B = ',B,' C = ',C);
End.
0
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
Similar
Эксперт
41792 / 34177 / 6122
Регистрация: 12.04.2006
Сообщений: 57,940
14.11.2012, 17:58
Здравствуйте! Я подобрал для вас темы с ответами на вопрос Перевод из Pascal в C++ (C++):

перевод в C++ из Pascal - C++
Кому не сложно переведите пожалуйста программу в С++. Она готова и полностью рабочая. вот на всякий случай сама задача: Таблица...

Перевод с pascal на c++ - C++
Вообще не знаю pasсal, нужен перевод. program aaa; Type mas=array of integer; Var a: array of integer; s, d:mas; {массив элементов...

Перевод из Pascal в C++ - C++
Помогите перевести в C++ Var s,s1,s2 : String; a : Array Of String; N,i,j : LongInt; Begin ...

перевод из Pascal в C++ - C++
Здравствуйте!Задача: Прямоугольный садовый участок шириной N и длиной M метров разбит на квадраты со стороной 1 метр. На этом участке...

Перевод из Pascal на C++ - C++
Помогите перевести программу из Pascal на С++ program lab; const N=30; var A:array of real; i,k:integer; S:real; begin ...

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

2
ablai96
116 / 114 / 13
Регистрация: 14.09.2012
Сообщений: 276
Завершенные тесты: 6
14.11.2012, 18:13 #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
#include <iostream>
using namespace std;
 
int main()
{
    int a = 0;
    int b = 0;
    int c = 0;
    
    cout << "Vedite chisla a, b, c: ";
    cin >> a >> b >> c;
    
    if((a < b) && (b < c))
    {
        a = a*2;
        b = b*2;
        c = c*2;
    }
    else
    {
        a = -a;
        b = -b;
        c = -c;
    }
    
    cout << "a = " << a << " b = " << b << " c = " << c << endl;
    system("pause");
    return 0;
}
1
77Bender77
18 / 18 / 0
Регистрация: 16.12.2010
Сообщений: 145
14.11.2012, 18:14 #3
ANSI/Turbo Pascal to C/C++ converter
1
MoreAnswers
Эксперт
37091 / 29110 / 5898
Регистрация: 17.06.2006
Сообщений: 43,301
14.11.2012, 18:14
Привет! Вот еще темы с ответами:

Перевод из Pascal в C++ - C++
В файле W задан массив из девяти элементов. В новом файле WW сформировать массив, в котором каждому элементу будет присвоено значение...

Перевод из Pascal в C++ - C++
Помогите перевести в С++. Вот код : program Adam; uses crt; var func,x,y,yp:array of real; proiz:array of real; ...

Перевод с С++ на Pascal - C++
Спичечная модель Профессор Самоделкин решил изготовить объемную модель кубиков из спичек, используя спички для рёбер кубиков. Длина...

Перевод c Pascal на С++ - C++
Помогите перевести пожалуйста program FindMin; type Mass=array of integer; function MinK(X:Mass;k:integer):integer; var...


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

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

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