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

Перегнать с паскаля в С++ - C++

Восстановить пароль Регистрация
 
mrsniper
2 / 2 / 0
Регистрация: 13.11.2012
Сообщений: 15
13.11.2012, 19:16     Перегнать с паскаля в С++ #1
здравствуйте, мне нужно перегнать с Паскаля в C++.

Код Pascal:

program ss;
var
x, y, z, a: intraer;
begin
readln (x,y,z);
while not (x < y and y < z) do
begin
if x>y then
begin
a : = x;
x := y;
y := a;
end;
if y>z then
begin
a : =y;
y := z;
z := a;
end;
end;
writeln (x,y,z);
end.
Similar
Эксперт
41792 / 34177 / 6122
Регистрация: 12.04.2006
Сообщений: 57,940
13.11.2012, 19:16     Перегнать с паскаля в С++
Посмотрите здесь:

перегнать с C++ на C# C++
Из паскаля в С++ C++
C++ Перегнать с паскаля на чистый С
Перегнать из паскаля на С(чистый) C++
C++ Перегнать с паскаля в С (небольшая програмам)
После регистрации реклама в сообщениях будет скрыта и будут доступны все возможности форума.
David Sylva
 Аватар для David Sylva
1281 / 943 / 51
Регистрация: 17.05.2012
Сообщений: 2,686
13.11.2012, 19:20     Перегнать с паскаля в С++ #2
Какое задание?
Mgauk
 Аватар для Mgauk
27 / 27 / 1
Регистрация: 03.01.2011
Сообщений: 85
13.11.2012, 19:21     Перегнать с паскаля в С++ #3
C++
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
#include <stdio.h>
 
int main() {
    int x, y, z, a;
    scanf("%i %i %i",x,y,z);
    while(!(x < y and y < z)) {
        if(x > y) {
            a = x;
            x = y;
            y = a;
        }
        if(y > z) {
            a = y;
            y = z;
            z = a;
        }
    }
    printf("%i %i %i",x,y,z);
}
BumerangSP
 Аватар для BumerangSP
4283 / 1405 / 121
Регистрация: 16.12.2010
Сообщений: 2,941
Записей в блоге: 3
13.11.2012, 19:24     Перегнать с паскаля в С++ #4
C++
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
#include <iostream>
int main()
{
 int x, y, z, a;
 std::cin>>x>>y>>z;
 while (! ((x < y) && (y < z)))
 {
  if (x>y)
  {
   a = x;
   x = y;
   y = a;
  }
  if (y>z)
  {
   a =y;
   y = z;
   z = a;
  }
 }
std::cout<<x<<y<<z;
return 0;
}
ZaMaZaN4iK
Мой лучший друг-отладчик!
 Аватар для ZaMaZaN4iK
163 / 163 / 9
Регистрация: 24.06.2012
Сообщений: 662
Записей в блоге: 5
Завершенные тесты: 1
13.11.2012, 19:25     Перегнать с паскаля в С++ #5
вот так будет
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
#include <iostream>
 
int main()
{
int x,y,z,a;
std::cin>>x>>y>>z;
while(!(x<y && y<z))
{
if(x>y)
{
a=x;
y=z;
z=a;
}
if (y>z)
{
a =y;
y = z;
z = a;
}
}
std::cout<<x<<' '<<y<<' '<<z<<std::endl;
system("pause");
}
Somebody
2770 / 1583 / 141
Регистрация: 03.12.2007
Сообщений: 4,139
Завершенные тесты: 1
13.11.2012, 19:27     Перегнать с паскаля в С++ #6
Вообще так тут и цикл ни к чему.
C++
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
#include <algorithm>
#include <iostream>
 
int main()
{
    int x, y, z;
    std::cin >> x >> y >> z;
    if (x > y)
        std::swap(x, y);
    if (y > z)
        std::swap(y, z);
    if (x > y)
        std::swap(x, y);
    std::cout << x << y << z << std::endl;
}
mrsniper
2 / 2 / 0
Регистрация: 13.11.2012
Сообщений: 15
13.11.2012, 19:27  [ТС]     Перегнать с паскаля в С++ #7
Вот задание:
Значения переменных X, Y, Z поменять местами так, чтобы они оказались упорядоченными по убыванию.
David Sylva
 Аватар для David Sylva
1281 / 943 / 51
Регистрация: 17.05.2012
Сообщений: 2,686
13.11.2012, 19:28     Перегнать с паскаля в С++ #8
Цитата Сообщение от mrsniper Посмотреть сообщение
Вот задание:
Значения переменных X, Y, Z поменять местами так, чтобы они оказались упорядоченными по убыванию.
Поздно парни уже всё сделали.
Kastaneda
Модератор
Эксперт С++
 Аватар для Kastaneda
4236 / 2769 / 218
Регистрация: 12.12.2009
Сообщений: 7,104
Записей в блоге: 1
Завершенные тесты: 1
13.11.2012, 19:40     Перегнать с паскаля в С++ #9
Есть же такие вещи. Зачем руками перегонять?
Somebody
2770 / 1583 / 141
Регистрация: 03.12.2007
Сообщений: 4,139
Завершенные тесты: 1
13.11.2012, 20:37     Перегнать с паскаля в С++ #10
Цитата Сообщение от Kastaneda Посмотреть сообщение
Есть же такие вещи. Зачем руками перегонять?
Такие вещи, даже если они работают, не исправят "intraer" и расстановку скобок в "not (x < y and y < z)".
MoreAnswers
Эксперт
37091 / 29110 / 5898
Регистрация: 17.06.2006
Сообщений: 43,301
13.11.2012, 20:43     Перегнать с паскаля в С++
Еще ссылки по теме:

"Перегнать" код из С в С++ (через fstream) C++
из паскаля в C++ C++
C++ Перегнать с Pascal на C++

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

Или воспользуйтесь поиском по форуму:
Kastaneda
Модератор
Эксперт С++
 Аватар для Kastaneda
4236 / 2769 / 218
Регистрация: 12.12.2009
Сообщений: 7,104
Записей в блоге: 1
Завершенные тесты: 1
13.11.2012, 20:43     Перегнать с паскаля в С++ #11
Да разработчики вроде пишут, что работает

Цитата Сообщение от Somebody Посмотреть сообщение
не исправят "intraer" и расстановку скобок в "not (x < y and y < z)".
Паскаля не знаю, поэтому ни чего сказать не могу.
Yandex
Объявления
13.11.2012, 20:43     Перегнать с паскаля в С++
Ответ Создать тему
Опции темы

Текущее время: 22:28. Часовой пояс GMT +3.
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin® Version 3.8.9
Copyright ©2000 - 2016, vBulletin Solutions, Inc.
Рейтинг@Mail.ru