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

Из паскаля в си++ - C++

Восстановить пароль Регистрация
 
tpoiiia
0 / 0 / 0
Регистрация: 20.04.2012
Сообщений: 3
20.04.2012, 19:17     Из паскаля в си++ #1
Здравствуйте. Помогите, пожалуйста, сконвертировать программу с турбо паскаля на си++. Очень нужно для проекта. Заранее благодарен.

Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
var n,i:integer; w:array[1..18] of longint; p,t,s,j,k,min:longint;
begin
assign(input, 'input.txt'); reset(input);
assign(output, 'output.txt'); rewrite(output);
readln ( n ); p:=0; s:=1;
for i:=1 to n do
begin read(w[i]); p:=p+w[i]; s:=s*2; end;
min:= p ;
for j:=1 to s-1 do
begin
k:=j; t:=0; i:=0;
while k>0 do
begin
i:=i+1;
if k mod 2=0 then t:=t+w[i];
k:=k div 2;
end;
if abs(p-2*t)<min then min:=abs(p-2*t);
end;
write(min);
end.
Similar
Эксперт
41792 / 34177 / 6122
Регистрация: 12.04.2006
Сообщений: 57,940
20.04.2012, 19:17     Из паскаля в си++
Посмотрите здесь:

C++ из паскаля в си)
C++ с паскаля на с++
из паскаля в с++ C++
C++ C Паскаля на С++
С паскаля на с++ C++
С Паскаля на С++ C++
C++ с паскаля в с++
с паскаля на с++ C++

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

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

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