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

перевести с pascal в С++ - C++

Восстановить пароль Регистрация
Другие темы раздела
C++ Builder Project Project1.exe raised exception class EConvertError with message ''' is not a valid floating point value'. http://www.cyberforum.ru/cpp-beginners/thread274405.html
Project Project1.exe raised exception class EConvertError with message ''' is not a valid floating point value'. чьо такоє? //--------------------------------------------------------------------------- #include <vcl.h> #include <math.h> #pragma hdrstop #include "Unit1.h" //---------------------------------------------------------------------------
C++ Пробел Здравствуйте. Вот есть код: #include "stdafx.h" #include <iostream> using namespace std; void main() http://www.cyberforum.ru/cpp-beginners/thread274404.html
C++ Использование указателей при работе с одномерными и двумерными массивами.
Кто может решить. Даны натуральное число n,действительные числа X1,...,Xn.Вычислить: (X1+X2+2Xn)(X2+X3+2Xn-1)...(Xn-1+Xn+X2) Язык Turbo СИ
C++ Перевод из 10-ой в любую другую систему счисления.
#include<iostream> #include<cstring> using namespace std; void d_to_char(double x1,int osn, char x_db){ double x=fabs(x1); int cel=floor(x); double res=0,res1=0; double ost=x-cel; while(cel%osn!=0) { cel=cel%osn;
C++ Бинарное дерево. Поиск. http://www.cyberforum.ru/cpp-beginners/thread274360.html
Здравствуйте. Дано задание, создать бинарное дерево с возможностью добавления, удаления элементов и поиск. Знаю, что тут ничего сложного и в принципе всё сделал. По ходу изучения понял что чтобы красиво выводить дерево мне нужны итераторы, с этим тоже более менее разобрался. Но есть одна загвоздка с поиском. Не знаю как обработать случай, когда искомый элемент не найден. template<typename T>...
C++ Выяснить, входит ли в последовательность S1 ,. . ., Sm буква Ю Даны натуральное число n, символы S1 ,..., Sn . Известно, что символ S1 отличен от символа * и что среди S2 , S3 ,. . ., Sn есть по крайней мере один символ *. Пусть S1 ,. . ., Sn - символы данной последовательности, предшествующие первому символу * ( m заранее неизвестно). Выяснить, входит ли в последовательность S1 ,. . ., Sm буква Ю подробнее

Показать сообщение отдельно
MrGluck
Ворчун
Эксперт С++
 Аватар для MrGluck
4927 / 2670 / 243
Регистрация: 29.11.2010
Сообщений: 7,429
11.04.2011, 17:29     перевести с pascal в С++
Помогите пожалуйста написать аналогичную функцию, но на языке C++. (В паскале нифига не шарю)

Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
Const
  MAX_X=80;
  MAX_Y=24;
Type
  Pole=array [1..MAX_X, 1..MAX_Y] of Boolean;
 
Function Sosedi (a: Pole ; x,y:integer):integer;
Var
Cnt:integer;
Begin
Cnt:=0;
If (x-1>0) and                          a[x-1,y] then Cnt:=Cnt+1;
If (x-1>0) and (y-1> 0) and             a[x-1,y-1] then Cnt:=Cnt+1;
    If (x-1>0) and (y+1<=MAX_Y) and     a[x-1,y+1] then Cnt:=Cnt+1;
    If (x+1<=MAX_X) and                     a[x+1,y] then Cnt:=Cnt+1;
    If (x+1<=MAX_X) and (y-1> 0) and    a[x+1,y-1] then Cnt:=Cnt+1;
    If (x+1<=MAX_X) and (y+1<=MAX_Y) and a[x+1,y+1] then Cnt:=Cnt+1;
    If (y-1> 0) and                           a[x,y-1] then Cnt:=Cnt+1;
    If (y+1<=MAX_Y) and                     a[x,y+1] then Cnt:=Cnt+1;
    Result:=Cnt;
End;
После регистрации реклама в сообщениях будет скрыта и будут доступны все возможности форума.
 
Текущее время: 07:54. Часовой пояс GMT +3.
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin® Version 3.8.9
Copyright ©2000 - 2016, vBulletin Solutions, Inc.
Рейтинг@Mail.ru