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

Перевод кода из паскаля в с++ - C++

Восстановить пароль Регистрация
Другие темы раздела
C++ Создать объект типа "связаный двунаправленный список", с перегруженными унарными операциями http://www.cyberforum.ru/cpp-beginners/thread1217932.html
Помогите, пожалуйста, с задачей! Создать объект типа "связаный двунаправленный список", с перегруженными унарными операциями ++, --(постфиксным и префиксным) для движения по списку вперед и назад.
C++ Неверная кодировка в текстовом документе как с этим справиться? кодировка unicode. как сделать нормальные буквы? http://www.cyberforum.ru/cpp-beginners/thread1217923.html
Создать класс углов на плоскости C++
Ребят, помогите решить пожалуйста. Создать класс углов на плоскости с данными-членами значение угла в градусах и минутах. Перегрузить операторы ввода и вывода объекта, сложения и вычитания углов. Создать функции-члены для перевода угла из градусов в радианы и наоборот, вычисления тригонометрических функций. Создать пример для демонстрации возможностей класса.
Программа записывает русские слова в txt, но они отображаются кракозябрами C++
в slovar.txt нормально записываются только английские слова, русские отображаются символами. #include <StdAfx.h> #include <fstream> #include <iostream> #include <Windows.h> int main() { setlocale(LC_ALL, "Russian"); int i;
C++ Можно ли в std::string записать Ansi символ (например NUL)? http://www.cyberforum.ru/cpp-beginners/thread1217861.html
Можно ли в std::string записать Ansi символ(например NUL)?
C++ Вычислить длину введенной с клавиатуры строки используя библиотеку string Напишите программу, которая вычисляет длину введенной с клавиатуры строки используя библиотеку string подробнее

Показать сообщение отдельно
Dreyko2
0 / 0 / 0
Регистрация: 21.06.2014
Сообщений: 15
26.06.2014, 22:08     Перевод кода из паскаля в с++
Незнаю как перевести из паскаля в с++
Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
ar
  x, y: real;
 
begin
  readln(x, y);
  if ((x < 0) and (y < 0)) then
  begin
    x := abs(x);
    y := abs(y);
  end
  else
  if (((x < 0) and (y >= 0)) or ((x >= 0) and (y < 0))) then
  begin
    x += 0.5;
    y += 0.5;
  end
  else
  if (((0.5 <= x) and (x <= 2)) or ((0.5 <= y) and (y <= 2))) then
  begin
    x /= 10;
    y /= 10;
  end;
  writeln(x, ' ', y);
end.
После регистрации реклама в сообщениях будет скрыта и будут доступны все возможности форума.
 
Текущее время: 12:55. Часовой пояс GMT +3.
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin® Version 3.8.9
Copyright ©2000 - 2016, vBulletin Solutions, Inc.
Рейтинг@Mail.ru