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

кто может перевести код в с++ - C++

Войти
Регистрация
Восстановить пароль
Другие темы раздела
C++ Симплекс метод решения задач линейного программирования http://www.cyberforum.ru/cpp-beginners/thread831534.html
Как реализовать в программе симплек метод решения задач линейного программирования
C++ Гроб настоящий! Всем привет! Помогите пожалуйста, напишите код решения этой задачи или объясните хотя бы идею... { Ограничение по времени, сек 2 Ограничение по памяти, мегабайт 64 Мальчику Пете очень... http://www.cyberforum.ru/cpp-beginners/thread831514.html
C++ Нужно описание кода!
кто может описать код?? #include <stdio.h> #include <stdlib.h> #include <time.h> #include <conio.h> #define MENTION printf("Enter 'j', 'i', 'l' or 'k' to move the empty cell left, up,...
программа для вычислений ряда C++
Приветики,лучшим программистам!!!Можете помочь пожалуйста мне с программкой)))Буду очень благодарна))) Дан числовой ряд,нужно при помощи рекурсии вычислить сумму n членов этого ряда.Заранее спасибо...
C++ Задача с монетами http://www.cyberforum.ru/cpp-beginners/thread831494.html
Здравствуйте! я начал изучать С++ и вот такая задача. "Дано натуральное число N. Как наименьшим количеством монет можно выплатить N копеек. Предполагается что в достаточном количестве имеются монеты...
C++ Динамическая строка! Здравствуйте, что такое динамическая строка, чем она отличается от обычной строки? подробнее

Показать сообщение отдельно
Никита86
0 / 0 / 0
Регистрация: 05.04.2013
Сообщений: 6
08.04.2013, 17:38  [ТС]
Спасибо вам огромное!
если вам будет не сложно то помогите еще с переводом этого кода!
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
uses
  CRT;
 
const
  N = 5;
 
type
  ArrayN = Array [1..N] of Integer;
 
var
  X: ArrayN;
  i, Number: Integer;
 
begin
  Clrscr;
  Randomize;
  for i := 1 to N do
  begin
    X[i] := -1000 + Random(2000);
    Write(X[i], ' ');
  end;
  Writeln('');
  Number := X[1];
  for i := 1 to N-1 do
    X[i] := X[i+1];
  X[N] := Number;
  for i := 1 to N do
    Write(X[i], ' ');
  Readln;
end.
0
 
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin® Version 3.8.9
Copyright ©2000 - 2017, vBulletin Solutions, Inc.
Рейтинг@Mail.ru