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

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

Войти
Регистрация
Восстановить пароль
 
Новичок8
0 / 0 / 0
Регистрация: 03.05.2015
Сообщений: 34
#1

Перевод кода с Паскаля на С++ - C++

16.05.2015, 20:06. Просмотров 329. Ответов 7
Метки нет (Все метки)

помогите перевести код программы с Паскаля в с++, пожалуйста!
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
Program pr1;
uses crt;
var f:text;
s:string;
i:byte;
n:integer;
begin
clrscr;
assign(f,'c:\laba6a.txt');
reset(f);
read(f,s);
writeln(s);
close(f);
rewrite(f);  
for i:=1 to 12 do 
begin
writeln('введите в файл ',i,'новое слово:');
readln(s);
s:=s+' ';
write(f,s);
end;
clrscr;
writeln('измененный файл');
reset(f);
for i:=1 to 12 do
begin
read(f,s);
writeln(s);
end;
close(f);
readln; 
end.
0
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
Similar
Эксперт
41792 / 34177 / 6122
Регистрация: 12.04.2006
Сообщений: 57,940
16.05.2015, 20:06
Здравствуйте! Я подобрал для вас темы с ответами на вопрос Перевод кода с Паскаля на С++ (C++):

Перевод кода из Паскаля в С++ - C++
Я в С++ не бум бум, написал прогу на паскале а нуно на Си++ помогите перевести Задача : Назовем допустимым преобразованием матрицы...

Перевод кода с Паскаля на C++ - C++
Помогите пожалуйста перевести код программы из паскаля в с++ Uses crt; Var j,i,nech_kol,ch_kol,q,p,sum_nech,sum_ch: Integer; ...

Перевод кода из паскаля в c++ - C++
Собственно надо перевести этот код из паскаля в c++, чтобы программа выдавала такие же данные и тот же результат. const n=30; ...

Перевод кода из Паскаля в С++ - C++
uses crt,graph; type TPoint=record x,y:integer; end; var p1,p2,p3,p4:arrayof TPoint; gd,gm:integer; ...

Перевод кода из паскаля в с++ - C++
Незнаю как перевести из паскаля в с++ ar x, y: real; begin readln(x, y); if ((x < 0) and (y < 0)) then begin ...

Перевод кода с паскаля в С++ - C++
помогите перевести код с Паскаля в С++, пожалуйста! Program pr1; uses crt; var s:string; begin clrscr; write('введите слова:');...

7
Zoominger
364 / 253 / 62
Регистрация: 22.06.2010
Сообщений: 1,566
16.05.2015, 20:35 #2
"Помощь" подразумевает, что хоть что-то уже сделано. Наработки в студию!
0
Новичок8
0 / 0 / 0
Регистрация: 03.05.2015
Сообщений: 34
16.05.2015, 20:38  [ТС] #3
в том то и дело, что ничего нет. Я начал изучать с++, но мне нужен хотя бы пример, как это будет выглядеть.
0
Zoominger
364 / 253 / 62
Регистрация: 22.06.2010
Сообщений: 1,566
16.05.2015, 20:48 #4
Всё не так сложно
Все переменные из раздела var переписываете на C++-синтаксис:

C++ (Qt)
1
2
3
string s;
int n;
fstream f;//файл
Файл подключаете с помощью функций из <fstream.h>:

C++ (Qt)
1
f.open("c:\laba6a.txt"); //открываем файл
Переписываем циклы на такие:

C++ (Qt)
1
2
3
for(int i=1; i<=12; i++){
//кодъ
}
Проще не переводить, а написать программу заново. Что она вообще делает?
0
Новичок8
0 / 0 / 0
Регистрация: 03.05.2015
Сообщений: 34
16.05.2015, 20:51  [ТС] #5
Вот условие задачи: Элементами файла являются отдельные слова. Изменить все его элементы на другие слова (их значения вводятся с клавиатуры), если известно, что в существующем файле записаны 12 слов.
0
Zoominger
364 / 253 / 62
Регистрация: 22.06.2010
Сообщений: 1,566
16.05.2015, 20:58 #6
Цитата Сообщение от Новичок8 Посмотреть сообщение
Изменить все его элементы на другие слова (их значения вводятся с клавиатуры), если известно, что в существующем файле записаны 12 слов.
... и записать снова?

Добавлено через 48 секунд
И правильно ли я понял, что можно тупо затереть старый файл и записать туда новые 12 слов?
0
Новичок8
0 / 0 / 0
Регистрация: 03.05.2015
Сообщений: 34
16.05.2015, 21:01  [ТС] #7
именно так
0
Zoominger
364 / 253 / 62
Регистрация: 22.06.2010
Сообщений: 1,566
16.05.2015, 21:13 #8
Одну минуту, я пока в соседней вашей теме код переписываю.

Добавлено через 10 минут
C++ (Qt)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
#include <fstream>
#include <iostream>
 
using namespace std;
 
int main()
{
fstream f;
f.open("c:\laba6a.txt", ios::trunc);
for(int i = 0; i < 12; i++){
cout << "Введите слово# " << i+1 << " : \n";
string s;
cin >> s;
s = s + ' ';
f << s;
}
f.close();
return 0;
Как-то слишком просто получилось, лучше уточните задание. Пример компилируется, работоспособность не проверял.
0
16.05.2015, 21:13
MoreAnswers
Эксперт
37091 / 29110 / 5898
Регистрация: 17.06.2006
Сообщений: 43,301
16.05.2015, 21:13
Привет! Вот еще темы с ответами:

Перевод кода с Паскаля на С++ - C++
Помогите плиз перевести код с Паскаля на С++, компилятор DEV C++. Буду вам очень благодарен. Код Pascal Var i:longint; n,k:byte; ...

Перевод кода из Паскаля в C++ - C++
помогите пожалуйста перевести код в c++ integer procedure F2(ref(position) p,integer alpha,integer beta): begin integer m,t;...

Перевод кода с паскаля на С++ - C++
Нужно перевести на С++ program dvumerniu; uses crt; const m=2; n=4; type mat=array of integer; var ...

Перевод кода из Турбо паскаля в С++ - C++
Помогите перевести код из турбо Паскаля в С++ {$N+} { Вычисление интегpала десятиточечным методом Гаусса } uses crt,graph; var...


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

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

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