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

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

Войти
Регистрация
Восстановить пароль
 
gadalov21
0 / 0 / 0
Регистрация: 14.12.2013
Сообщений: 3
#1

Перепишите программу из Pascal в C++ - C++

14.12.2013, 13:50. Просмотров 238. Ответов 2
Метки нет (Все метки)

Здравствуйте. Прошу вас о помощи. Есть программа на Pascal. Нужно переписать её на C++, чтобы она выполняла такие же операции. Вот код:

Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
Program t1;
var   n: longint;
      p : int64;
begin
assign(input,'input.txt');
reset(input);
readln(n);
close(input);
if n>=1 then p:=n-1 else p:=abs(int64(n))+1;
assign(output,'output.txt');
rewrite(output);
write(p);
close(output);
end.
0
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
Similar
Эксперт
41792 / 34177 / 6122
Регистрация: 12.04.2006
Сообщений: 57,940
14.12.2013, 13:50
Здравствуйте! Я подобрал для вас темы с ответами на вопрос Перепишите программу из Pascal в C++ (C++):

Перепишите с Pascal на C++ - C++
uses crt; const nmax = 30; type TInfo = record M : real; V : real; end;

Перепишите задачу из Pascal на C++ (Есть условие) - C++
Здравствуйте, прошу о помощи. Решите задачу: В начальной школе Будущего изучали целые числа типа Longint, который они взяли из языка...

Перепишите, пожалуйста, программу, используя цикл for - C++
#include "stdafx.h" #include <iostream> #include <math.h> using namespace std; int main() { double y, x, a, b, h, p, eps,...

Перепишите правильно программу, нахождения последнего слова из строки - C++
Нужно вывести последнее слово из строки, перепишите программу, запуталась #include <stdio.h> #include <string.h> main() { char...

Перепишите с С на С++ - C++
#include<conio.h> #include<stdio.h> const int N = 10; main(){ int A, i, b; for(i=0; i<N; i++){ ...

Перепишите пожалуйста на C++ - C++
procedure TForm1.Button1Click(Sender: TObject); var r5,x1,y1,x2,y2,x3,y3,x4,y4:integer; l,n,r4,r3,r1,r2:integer; begin ...

2
Doksim
57 / 57 / 8
Регистрация: 08.12.2013
Сообщений: 257
14.12.2013, 13:58 #2
Цитата Сообщение от gadalov21 Посмотреть сообщение
Здравствуйте. Прошу вас о помощи. Есть программа на Pascal. Нужно переписать её на C++, чтобы она выполняла такие же операции. Вот код:

Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
Program t1;
var   n: longint;
      p : int64;
begin
assign(input,'input.txt');
reset(input);
readln(n);
close(input);
if n>=1 then p:=n-1 else p:=abs(int64(n))+1;
assign(output,'output.txt');
rewrite(output);
write(p);
close(output);
end.
врятли вам кто нибудь ответит, лучше создайте другую тему с условием задачи.
0
gadalov21
0 / 0 / 0
Регистрация: 14.12.2013
Сообщений: 3
14.12.2013, 14:18  [ТС] #3
Перепишите задачу из Pascal на C++ (Есть условие) Так и сделал!

Добавлено через 13 минут
Doksim, Перепишите задачу из Pascal на C++ (Есть условие) Так и сделал!

Добавлено через 24 секунды
Doksim, Перепишите задачу из Pascal на C++ (Есть условие)
0
MoreAnswers
Эксперт
37091 / 29110 / 5898
Регистрация: 17.06.2006
Сообщений: 43,301
14.12.2013, 14:18
Привет! Вот еще темы с ответами:

Перепишите код - C++
Здраствуйте, помогите пожалуйста переписать код так что бы не через указатель temp, а через вызов функции с тела программы. #include...

перепишите на C++ пожалуйста - C++
Перепешите пожалуйста на С/С++. uses crt; var a:array of integer; n,i:integer; begin writeln('Введите любые числа от -10 до...

Перепишите строчку на printf_s - C++
case 1: cout << "\n Red"; break; как строчку эту переписать на printf_s

Перевести программу с Pascal на С++ - C++
Program SumCuba; var x, {пробное число} n, {последняя цифра} p, {число без последней цыфры} s:integer; {сумма кубов цифр} ...


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

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

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