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

С++ для начинающих

Войти
Регистрация
Восстановить пароль
 
AngelBeast
Сообщений: n/a
#1

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

15.06.2013, 14:07. Просмотров 258. Ответов 0
Метки нет (Все метки)

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++
Найти в массиве: 1) сумму элементов с нечётными номерами 2) Сумму элементов между первым и последним отрицательными элементами 3) в...

нужно перевести с паскаля на с++ - C++
uses crt; var E,x,p,t:real; k:integer; { Возведение х в степень к } function step(x:real;k:integer):real; var i: integer; ...

Перевести код с паскаля на C++ - C++
По заданному натуральному числу N необходимо вычислить количество натуральных чисел, которые являются делителями N! (факториала числа N). ...

Перевести код из Паскаля в С++ - C++
Помогите, пожалуйста перевести в с++ uses crt; const nmax=20; var a:array of integer; n,m,i,j,k:byte; s,x:integer; ...

Перевести код с Паскаля на Си++ - C++
Добрый всем день! Будьте добры, перепишете пожалуйста данную программу из паскаля на си++. Буду очень благодарен. Я сам Паскаль не знаю....

Перевести код с Паскаля на С++ - C++
Фирме принадлежат два магазина. Известна стоимость товаров, проданных в каждом магазине за каждый день в июле и августе, которая хранится в...

Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
MoreAnswers
Эксперт
37091 / 29110 / 5898
Регистрация: 17.06.2006
Сообщений: 43,301
15.06.2013, 14:07
Привет! Вот еще темы с ответами:

Перевести код паскаля в с++ - C++
Нужно перевести данный код паскаля в с++. Задание: Найти в строке все заданные последовательности символов и заменить их другой...

Перевести код с Паскаля на С++ - C++
Program proga; uses crt; Type gostinica= record FIO:string; nomer:integer; cena:integer; kolvo:integer; itogo: integer; ...

Перевести код из Паскаля в Си++ - C++
Переведите пожалуйста из Паскаля в Си++, кому не сложно.

Нужно перевести программу из Паскаля в С++ - C++
К сожалению С++ только начали изучать, а программ задали много Delphi знаю хорошо Задача 1.Составить программу упорядочения по...


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

Или воспользуйтесь поиском по форуму:
Ответ Создать тему
Опции темы

КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin® Version 3.8.9
Copyright ©2000 - 2017, vBulletin Solutions, Inc.
Рейтинг@Mail.ru