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

Нужно перевести код с паскаля в С++ - C++

Восстановить пароль Регистрация
 
AngelBeast
Сообщений: n/a
15.06.2013, 14:07     Нужно перевести код с паскаля в С++ #1
1)Дан текст, имеющий вид: “d1- d2+d3 - … ”, где di – цифры (n>1). Вычислить записанную в тексте алгебраическую сумму.
2)Дан текст, имеющий вид: “d1+- d2+- …+- dn”, где di – цифры (n>1). Вычислить записанную в тексте алгебраическую сумму.
Ребят нужно срочно решить на С++ , вот код на паскале.

1)

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
 uses crt; 
 var s:string;
 sum,d,i,e,sign:integer;
 begin
 write('Введите строку: ');
 readln(s);
 sum:=0;
 sign:=1;
 for i:=1 to length(s) do
 case s[i] of
 '+': sign:=1;
 '-': sign:=-1;
 else begin
 val(s[i],d,e);
 if (e=0) then sum:=sum+d*sign;
 end;
 end;
 writeln('Сумма = ', sum);
 end.
 
 2)
 
 uses crt;
 var s:string;
 sum,d,i,e,sign:integer;
 begin
 write('vvedite strocy: ');
 readln(s);
 sum:=0;
 sign:=1;
 for i:=1 to length(s) do
 case s[i] of
 '+': sign:=1;
 '-': sign:=-1;
 else begin
 val(s[i],d,e);
 if (e=0) then sum:=sum+d*sign;
 end;
 end;
 writeln('summ = ', sum);
 end.
Similar
Эксперт
41792 / 34177 / 6122
Регистрация: 12.04.2006
Сообщений: 57,940
15.06.2013, 14:07     Нужно перевести код с паскаля в С++
Посмотрите здесь:

нужно перевести с Паскаля на С++ C++
C++ Перевести код с Паскаля на С++
C++ Перевести код паскаля в с++
нужно перевести с паскаля на с++ C++
C++ Перевести код с паскаля на C++
C++ Перевести код из Паскаля в С++
C++ Перевести код с Паскаля на С++
Необходимо перевести код с паскаля на С++ C++

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

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

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