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

переделать в borland c++ - C++

Войти
Регистрация
Восстановить пароль
Другие темы раздела
C++ Выдает ошибку sqrt: domain error http://www.cyberforum.ru/cpp-beginners/thread434529.html
Помогите решить проблему! Незнаю почему она выходит, исправте пожалуйста цель задачи: Дано множество точек, построить треугольник таким образом что бы внутри треугольника находилось большее количество точек этого множества, вычисли площадь и полупериметр #include <conio.h> #include <stdlib.h> #include <math.h> #include <graphics.h> #include <fstream.h> #define PIXEL_COUNT 100
C++ Передача параметров в функцию WndProc Начал осваивать WinAPI и столкнулся со следующей проблемой - необходимо передать в качестве параметров некоторые переменные в функцию WndProc: LRESULT CALLBACK WndProc( HWND hWnd, UINT message, WPARAM wParam, LPARAM lParam) { cout<<"at bottom of message\n"; switch (message) { cout<<"In msg\n"; http://www.cyberforum.ru/cpp-beginners/thread434509.html
Сноска строки C++
Как снести строку Программным способом? Или как выделить что бы писать на 2 строке и на 3 и на 4. m_zone1="Добро пожаловать."; Добавлено через 15 часов 2 минуты Как? Как это сделать?
C++ класс колоды карт и карты
помогите найти ошибку не компелируется! #include <iostream> #include <stdlib.h> #include <time.h> #include <locale> using namespace std; struct Karta{ int mast, rang; Karta():mast(-1),rang(-1){}; };
C++ Проверка с if http://www.cyberforum.ru/cpp-beginners/thread434497.html
Есть треугольник забитый (*) надо сделать пустоту в нем оставить только контур -------* ------*-* -----*---* ----*-----* ---*-------* --*---------* -********** Не знаю где проверки всдить
C++ Кратное число Задан массив из 10 чисел Вывести те числа чей порядковый номер кратен 3! не выводит число :( # include<iostream> using namespace std; int main(){ int m ={5,3,8,2,4,56,23,1,7,3}; for (int i=-1; i>9; i++){ if (i%3==0){ cout << m ; } подробнее

Показать сообщение отдельно
RoMeDrI
0 / 0 / 0
Регистрация: 22.01.2012
Сообщений: 5

переделать в borland c++ - C++

24.01.2012, 19:55. Просмотров 259. Ответов 0
Метки (Все метки)

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
47
48
49
50
[PASCAL]var
i,j,jmax:integer;
a:array[1..5,1..4] of real;
b:array[1..5] of real;
k,max,s:real;
begin
for i:=1 to 5 do
for j:=1 to 4 do
begin
write ('vvod a[',i:2,',',j:2,']=');
readln(a[i,j]);
writeln;
end;
writeln(' matrica A');
for i:=1 to 5 do
begin
for j:=1 to 4 do
write(' ',a[i,j]:6:2);
writeln();
end;
 
for i:=1 to 5 do
begin
s:=0;
for j:=1 to 4 do
s:=s+a[i,j];
b[i]:=s;
end;
writeln('odnomernii masive');
for j:=1 to 5 do
writeln(b[j]:6:2);
begin
max:=-1000;
for j:=1 to 4 do
if (max<a[5,j]) then
begin max:=a[5,j]; jmax:=j;
end;
writeln ('max znachenie pyatoi stroki=',max:5:1);
end;
k:=a[3,4];
a[3,4]:=a[5,jmax];
a[5,jmax]:=k;
writeln('matrica posle obmena');
for i:=1 to 5 do
begin
for j:=1 to 4 do
write(' ',a[i,j]:5:1);
writeln;
end;
End.
[/PASCAL]
После регистрации реклама в сообщениях будет скрыта и будут доступны все возможности форума.
 
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin® Version 3.8.9
Copyright ©2000 - 2017, vBulletin Solutions, Inc.
Рейтинг@Mail.ru