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

Переписать в С++ - C++

Войти
Регистрация
Восстановить пароль
Другие темы раздела
C++ нужно перевести на С++ http://www.cyberforum.ru/cpp/thread121782.html
uses crt; const n=4; type rec=record name,str:string; oc1,oc2:integer; sum:integer; end; var x:array of rec; i:integer; max:integer;
C++ Не запускается в консоли!!!(А VS2008 компилирует и запускает)... В чем дело??? Доброго времени суток... у меня совершенно не понятная для меня проблема... причем проблема не в написании кода, а в том как запустить програмку... дело вот в чем ... пишу в VS2008 на Visual C++... пишу консольное приложение ...(отправить нужно рабочий exe-шник) в качестве аргумента на вход программе подается полный адрес txt файла с квадратной матрицей типа 12 14 8 32 - 4... http://www.cyberforum.ru/cpp/thread121736.html
Создание 2D игры C++
Всем привет! Недавно появилось желание создать игру. И у меня накопились вопросы. Поэтому прошу вашой помощи, хочу услышать ваши мнения и советы. Прогаю на С++, игру хочу созать в 2D Собственно первый вопрос это- какой движок юзать? Именно 2д, простой в использование и чтобы не было всяких лишних заморочек. От движка мне нужно красивая картинка и быстродействие.
C++ Переписать проги с Pascal на С++
Помогите. 1# Переварачивает число. uses crt; var a: word; begin clrscr; write('Vvedite 4rehzna4noe 4islo: '); readln(a); write(a mod 10 * 1000 + a mod 100 div 10 * 100 + a div 100 mod 10 * 10 + a div 1000); readkey;
C++ Линейная программа http://www.cyberforum.ru/cpp/thread121318.html
Всем привет! прошу помощи: Целой переменной S присвоить сумму цифр трехзначного целого числа k.
C++ Поля на С++ Дана задача: надо ввести поле на C++, потом поделить его на 4-ре квадрата, потом поделить эти квадраты, каждый еще на 4, потом еще и еще... делить надо 4 раза. люди помогите хотя бы советом как это надо реализовывать... заранее спасибо откликнувшимся подробнее

Показать сообщение отдельно
TP7
1 / 1 / 0
Регистрация: 23.12.2009
Сообщений: 93

Переписать в С++ - C++

25.04.2010, 19:23. Просмотров 486. Ответов 5
Метки (Все метки)

Помогите перевести в С++ немогу перевести.

Перемножение 2-х прямоугольных матриц.


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
51
52
53
54
55
56
57
58
59
60
61
62
63
64
Program PP_2;
uses crt;
type matr = array [1..8, 1..8] of real;
procedure UmnMatr(x,y:integer;m1,m2:matr;var m3:matr);
var k,i,j:integer;
begin
for k:=1 to x do
for j:=1 to x do
  begin
    m3[k,j]:=0;
    for i:=1 to y do
    m3[k,j]:=m3[k,j]+m1[k,i]*m2[i,j];
  end;
end;
var A,B,C:Matr;
    n,m,l : integer;
    i,j,k : integer;
begin
clrscr;
write ('Введите количество строк первой  n=');
readln (n);
write ('Введите количество столбцов первой матрицы и строк второй матрицы m=');
readln (m);
write ('Введите количество столбцов второй матрицы l=');
readln (l);
writeln ('Введите элементы матрицы А: ');
for i:=1 to n do
for j:=1 to m do
begin
write ('A[',i,',',j,']=');
readln(A[i,j]);
end;
writeln ('Введите элементы матрицы B : ');
for i:=1 to m do
for j:=1 to l do
begin
write ('B[',i,',',j,']=');
readln(B[i,j]);
end;
clrscr;
writeln('Матрица A:');
for i:=1 to n do
  begin
    for j:=1 to m do
    write(a[i,j]:6:2);
    writeln;
  end;
writeln('Матрица B:');
for i:=1 to m do
  begin
    for j:=1 to l do
    write(b[i,j]:6:2);
    writeln;
  end;
writeln ('Матрица С=A*B:');
UmnMatr(n,m,a,b,c);
for i:=1 to n do
   begin
     for j:=1 to l do
     write (C[i,j]:8:2);
     writeln;
   end;
readln
end.
После регистрации реклама в сообщениях будет скрыта и будут доступны все возможности форума.
 
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin® Version 3.8.9
Copyright ©2000 - 2017, vBulletin Solutions, Inc.
Рейтинг@Mail.ru