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

Перевод программы с Pascal на С++ - C++

Восстановить пароль Регистрация
 
Profain
Сообщений: n/a
30.01.2014, 19:54     Перевод программы с Pascal на С++ #1
Здравствуйте. Прошу помочь с одной задачей. Программа была написана на Pascal и теперь нужно перевести ее на С++. С чем у меня и проблемы.

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
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
Program okruz;
 
Type Vector = Array of integer;
Var
Tochki:Array of Vector;
center: Vector;
i, k,l,z:integer;
N,M,R:integer;
cur_R: real;
 
begin
write('input space Dimension:');
readln(N);
 
write('input Radius:');
readln(R);
setlength(center,N)  ;
 
for I := 0 to n - 1 do
  begin
    write('input [',i,'] coordinate of center ');
    readln(center[i]);
  end;
 
write('Input count of points:');
readln(M);
 
 
 setlength(tochki,M,N);
 
for k:=0 to M - 1 do
  For l:=0 to N - 1 do
  begin
    write('input [',l,'] coordinate of ',k,'-point  ');
    readln (Tochki[k,l]);
  end;
for k:=0 to M - 1 do
begin
  cur_R:=0;
  For l:=0 to N - 1 do
  begin
  cur_R:=cur_R+(Tochki[k,l]-center[l])*(Tochki[k,l]-center[l]);
  end;
  cur_R:=sqrt(cur_r);
  if cur_R< R  then   z:= z+1;
end;
 write ('Points Count  is ',z);
 readln;
 end.
Similar
Эксперт
41792 / 34177 / 6122
Регистрация: 12.04.2006
Сообщений: 57,940
30.01.2014, 19:54     Перевод программы с Pascal на С++
Посмотрите здесь:

Перевод программы с Pascal на С++ C++
C++ Перевод программы с Pascal на С++
C++ Перевод программы с Pascal на C++
C++ Перевод программы с Pascal на С++
C++ Перевод программы из Pascal в C++
C++ - Перевод программы с Pascal на C++ C++
Перевод программы из Pascal на C++ C++
C++ Перевод программы с pascal на С++

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

Или воспользуйтесь поиском по форуму:
После регистрации реклама в сообщениях будет скрыта и будут доступны все возможности форума.
Ответ Создать тему
Опции темы

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