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

простенький код Паскаля на С++ , - C++

Восстановить пароль Регистрация
Другие темы раздела
C++ Бинарное идеально-сбалансированное дерево http://www.cyberforum.ru/cpp-beginners/thread1195996.html
Есть такое условие для задачи. Автоматизированная информационная система на железнодорожном вокзале содержит сведения об отправлении поездов дальнего следования. Для каждого поезда указывается: - номер поезда; - станция назначения; - время отправления. Данные в системе организовать в виде бинарного идеально-сбалансированного дерева. Написать программу, которая: - обеспечивает...
C++ Переписать код програмы с QBasic в C++ ' Объявим константы: CONST pi = 3.141592653589793# CONST Gradus = pi / 180, RAD = 180 / pi ' Углы обзора CONST OBZORh = 40 * Gradus, OBZORv = 33 * Gradus ' Разрешение экрана CONST RezX = 319, RezY = 199 ' Геометрия CONST Points = 8 ' Вершин(точек) CONST Polygs = 6 ' Граней(полинонов) http://www.cyberforum.ru/cpp-beginners/thread1195978.html
Запуск проекта C++
Доброго времени суток) Какие библиотеки directx нужно подгрузить для запуска проекта?
C++ Сумма ряда, не совпадает с проверкой
Вычисление суммы ряда (цикл) и проверка (т.е. вычисление арктангенса ) не совпадают. Помогите найти ошибку, пожалуйста. // 3.cpp: определяет точку входа для консольного приложения. // #include "stdafx.h"
C++ Нужно перевести задачу с делфи на с++ http://www.cyberforum.ru/cpp-beginners/thread1195970.html
Помогите перевести задачу с делфи на с++. Срочно нужно. unit Unit1; interface uses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, StdCtrls; type TForm1 = class(TForm) ListBox1: TListBox;
C++ Чтение данных из файла Мне нужно прочитать с фаила и сделать запросы... Но как это сделать? помогите, пожалуйста... #include "stdafx.h" #include <iostream> #include <fstream> #include <iomanip> #include "conio.h" #include "stdlib.h" using namespace std; int main() { подробнее

Показать сообщение отдельно
аандрей
0 / 0 / 0
Регистрация: 29.04.2014
Сообщений: 8
02.06.2014, 00:15     простенький код Паскаля на С++ ,
Привет! опыта не хватает,ребята покажите как его в с++ испоганить,заранее благодарим
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
42
43
44
45
46
var i,j,task,n,k,index,gk:integer;
number:int64;
A : array[1..32,0..32] of int64;
Ans : array[1..32] of byte;
 
begin
 
for i:=1 to 32 do begin A[1,i]:=1;A[i,0]:=1;Ans[i]:=0;end;
for i:=2 to 32 do
for j:=1 to 32 do
A[i,j]:=A[i-1,j]+A[i,j-1];
 
read(task);
if task=0 then
begin
read(k,n,number);gk:=k;
index:=0;
 
while (k>0) and (n>0) do
begin
j:=0;
while A[k,j]<number do j:=j+1;
index:=index+1;Ans[index]:=n-j;
if j=0 then number:=0 else number:=number-A[k,j-1];
n:=j;k:=k-1;
end;
for i:=1 to gk do write(Ans[i],' ');
end else
if task=1 then
begin
read(k);gk:=k;
for i:=1 to k do read(Ans[i]);
 
number:=1;n:=Ans[k];j:=0;
k:=1;
for i:=gk-1 downto 1 do
begin
k:=k+1;
j:=n;
if j>0 then number:=number+A[k,j-1];
n:=Ans[i]+j;
end;
write(number);
end;
 
end.
Добавлено через 20 минут
тут,видимо, надо считать с клаввы символ, "чтото " с ним сделать...(может в ancii высветить?)..дайте функцию,посимвольно проверять строку в '\0' с конца .я запутался..
может так? char ansiTochar (char *pSt, int dlina_str=0){ // } const ..
пока думал-ушёл спать
После регистрации реклама в сообщениях будет скрыта и будут доступны все возможности форума.
 
Текущее время: 08:42. Часовой пояс GMT +3.
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin® Version 3.8.9
Copyright ©2000 - 2016, vBulletin Solutions, Inc.
Рейтинг@Mail.ru