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

Не могу перевести их pascal - C++

Восстановить пароль Регистрация
Другие темы раздела
C++ Массив объектов http://www.cyberforum.ru/cpp-beginners/thread568341.html
Задумка: Сделать некую подобию базы данных, список из "объектов". К объектам привязаны соответствующие данные разных типов (int, char и тд). С этими данными мне нужно будет в дальнейшем работать, поэтому должен быть постоянный доступ ко всем объектам в списке. К примеру, ОБЪЕКТ: Федя - 21 (год) - 72(вес). Изначально список пуст. Программа должна включать в себя возможность добавления вручную...
C++ Пузырьковая сортировка Написал программу сортировки методом пузырька: #include <stdio.h> #include <conio.h> #include <cstdlib> int main(){ http://www.cyberforum.ru/cpp-beginners/thread568336.html
Заполнение массива C++
Заполнить массив двадцатью первыми натуральными числами, делящимися нацело на 13 или на 17 и находящимися в интервале, левая граница которого равна 300. #include <iostream> using namespace std; int main () { int array1 ; int d = 300;
вещественная матрица C++
]помогите пожалуйста напечатать заданную вещественную матрицу , расположив ее столбцы в порядке невозрастания их l1 норм (||x||=||x1||+...||xn||). Использовать метод выборки минимальных элементов. делаю вот так а дальше что-то не получается: #include "stdafx.h" #include<iostream> #include<cmath> using namespace std; int _tmain(int argc, _TCHAR* argv) {int c,b,t,i, nums, a; int size=4;
C++ НЕ находит cin cout http://www.cyberforum.ru/cpp-beginners/thread568312.html
Вроде бы подключил заголовочные файлы. Почему не находит cin и cout они же вроде бы должны быть в iostream #include <stdafx.h> #include <iostream> #include <iomanip> #include <math.h> #include <windows.h> class ENTROPIA {
C++ Кодировка Ребят где можно почитать про то как ОС работает с кодовыми страницами, непонятны сами так сказать основы и почитать не найду где, вопросы примерно такие: 1. Если я компилирую исходник кодировка строковых переменных в нем будет как кодировка файла исходника? 2. Когда пишу консольную программку с русскими символами использую setlocale, что при этом происходит? мы даем команду консоли использовать... подробнее

Показать сообщение отдельно
kkk008009kkk
46 / 46 / 1
Регистрация: 24.03.2011
Сообщений: 315
08.05.2012, 01:06     Не могу перевести их pascal
Добрый день.
написал программу на паскале

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
var
x:array [1..100] of integer;
a,s,d,f,n,i,j,k:integer;
rt,rt2,h,c:integer;
begin
writeln('введите n');
readln(n);
x[1]:=1;
for i:=2 to n do
 
x[i]:=0;
 
writeln;
k:=n;
c:=1;
repeat
x[k]:=x[k]+1;
for i:=1 to n do
write(x[i], ' ');
writeln;
 
if x[k]=k then begin
x[k]:=0;
if x[k-c]=k-c then
inc(c);
x[k-c]:=x[k-c]+1;
end;
until x[1]=2;
 
end.
Переписал на Ci
C++
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
#include <stdio.h>
#include <conio.h>
#include <cstdlib>
 
int main(){
     
  int x[100];
 int a,s,d,f,n,i,j,k;       
int rt,rt2,h,c;
scanf("%d",&n);
x[1]=1;
 
for (i=2;i<=n;i++) {
 
x[i]=0;
printf("%d \n",x[i]);}
 
 
printf("\n");
k=n;
c=1;
do
{
x[k]=x[k]+1;
for (i=1;i<=n;i++) 
printf("%d " ,x[i]);
printf("\n");
 
if (x[k]=k) {
x[k]=0;
if (x[k-c]=k-c) c=c+1;
x[k-c]=x[k-c]+1;
}}
while (x[1]!=2);
getch();
}
Программа не работает в Си. В паскале все отлично

Условие задачи:
Напечатать все последовательности положительных целых чисел длины k, у которых i-ый член не превосходит i
После регистрации реклама в сообщениях будет скрыта и будут доступны все возможности форума.
 
Текущее время: 09:18. Часовой пояс GMT +3.
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin® Version 3.8.9
Copyright ©2000 - 2016, vBulletin Solutions, Inc.
Рейтинг@Mail.ru