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

Перевести код из Pascal в C++ - C++

Восстановить пароль Регистрация
Другие темы раздела
C++ Найти сумму ряда с точностью е, используя рекурсию http://www.cyberforum.ru/cpp-beginners/thread685306.html
Найти сумму ряда с точностью е , общий член которого равен a=(-1)^(n-1)/n^n. Программу я сделала, но преподаватель просит изменить условие, то есть сделать без лог.переменной f. Как можно еще изменить?!! Спасибо. #include "stdafx.h" #include <stdio.h> #include <math.h> #include <iostream> using namespace std; int Pow(int t , int n); // метод возведения в степень. t-возведение в степень...
C++ Неполучается получить доступ к виртульным функциям после загрузки объектов из файла #include <iostream> #include <fstream> #include <typeinfo> #include <process.h> using namespace std; const int MAX = 100; enum publication_type {book_type, tape_type}; http://www.cyberforum.ru/cpp-beginners/thread685286.html
C++ форматированный вывод
Всем, здрасте! У меня вопрос, как сделать вывод линии перед цифрами? (длина линии зависит от кол-ва цифр и точки) для реального у меня ограничение введите реальное и целое число: 2.71828183 1392 реальное: ______2.718 целое: ____1392 while(true) { cout<<"enter one integer and one real number:"<<endl;
Как использовать операторы сравнения C++
Помогите с формулой. Я уверен,что в моей формуле ошибка,потому что в любом вводе chislo выводит vozrastaniu. //проверить являются ли цифры в 4 значном числе по возрастанию. int chislo; cout<<"chislo="; cin>>chislo; if((chislo/1000)<(chislo/100-chislo/1000*10)<(chislo/10-chislo/100*10)<(chislo-chislo/10*10)) cout<<"vozrastaniu\n"; else cout<<"ne vozrastaniu\n";
C++ Определить ближайшее нечетное число http://www.cyberforum.ru/cpp-beginners/thread685270.html
Определить ближайшее нечетное число меньше заданного числа N, которое делится на 15 с остатком 6. код BORLANDC
C++ Аналог рекурсивной функции, отображающей строку в обратном порядке, выводит "мусор" Добрый день, при попытке написать аналог рекурсивной функции отображающей строку в обратном порядке напоролся на грабли: #include <iostream> #include <cstdio> using namespace std; void reverse_r(char* ch); void reverse_i(char* ch); // int factorial (int i); // int max_value (int a, int b); подробнее

Показать сообщение отдельно
HighPredator
 Аватар для HighPredator
5342 / 1725 / 320
Регистрация: 10.12.2010
Сообщений: 5,107
Записей в блоге: 3
01.11.2012, 11:36     Перевести код из Pascal в C++
Для Borland C++ 3.1:
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
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
#include<conio.h>
#include<iostream.h>
#include<iomanip.h>
#include<stdlib.h>
#include<graphics.h>
#include<math.h>
 
#define xmin 0
#define xmax 1
#define h 0.01
#define n 10
 
char st[256];
int x0,y0,mk,i,a,b,px,py;
float k0,k1,k2,k3,mx,my,z,x,y,dx,dy,yi,xi;
float kx,ky;
float ymin,ymax;
char s[256];
int far * gd;
int far * gm;
 
float f(float x,float y)
{
    return ((y/(x+1.0))-y*y);
}
 
int main()
{
    xi=0;
    yi=1;
    cout<<" k|  xk |  yk"<<endl;
    for(i=0;i<n+1;i++)
    {
        k0=h*f(xi,yi);
        k0=h*f(xi,yi);
    k1=h*f(xi+h/2.0,yi+k0/2.0);
    k2=h*f(xi+h/2.0,yi+k1/2.0);
    k3=h*f(xi+h,yi+k2);
    dy=(k0+2.0*k1+2.0*k2+k3)/6.0;
    yi=yi+dy;
        xi=xi+h;
        cout<<setw(2)<<i<<"|"<<setw(5);
        cout.precision(2);
        cout<<xi<<"|"<<setw(7);
        cout.precision(4);
        cout<<"yi"<<endl;
    }
    getch();
    detectgraph(0,0);
    initgraph(gd,gm,"egavga.bin");
    x=xmin;
    z=f(x,y);
    do
    {
        if(y<ymin) ymin=y;
        if(y>ymax) ymax=y;
        x=x+h;
    }
    while(x<1);
    x0=getmaxx()/10;
    y0=getmaxy()/2;
    mx=500.0/fabs(1.0);
    my=400.0/fabs(1.5);
    setbkcolor(BLACK);
    setlinestyle(0,0,1); 
  setcolor(GREEN);
  line(0,y0,getmaxx(),y0);
  line(x0,getmaxy(),x0,0);
    setcolor(RED);
    for(i=1;i<11;i++)
    {
        line(10,y0-ceil(i*my),630,y0-ceil(i*my));
    line(10,y0+ceil(i*my),630,y0+ceil(i*my));
    line(x0+ceil(i*mx),0,x0+ceil(i*mx),getmaxy());
    line(x0-ceil(i*mx),0,x0-ceil(i*mx),getmaxy());
        //str(i,s);
        itoa(i,s,10);
    outtextxy(x0-10,y0-ceil(i*my),s);
        outtextxy(x0-15,y0+ceil(i*my),'-'+s);
    }
    setcolor(WHITE);
  outtextxy(x0+5,y0+10,"0");
  outtextxy(getmaxx()-10,y0-10,"X");
  outtextxy(x0-10,10,"Y");
  setcolor(RED);
  x=xmin;
    dx=0.01;
    for(i=0;i<n+1;i++)
    {
        z=f(x,y);
    px=x0+ceil(xi*mx);
    py=y0-ceil(yi*my);
    putpixel(px,py,RED);
    xi=xi+dx;
        yi=yi+dy;
    }
    setcolor(RED);
  setlinestyle(0,0,1);
  outtextxy(230,30,"F=(y/x+1)-y^2");
    getch();
    closegraph();   
  return 0;
}
 
Текущее время: 08:26. Часовой пояс GMT +3.
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin® Version 3.8.9
Copyright ©2000 - 2016, vBulletin Solutions, Inc.
Рейтинг@Mail.ru