|
Компьютерный форум OSzone.net » Программирование, базы данных и автоматизация действий » Программирование и базы данных » C/C++ - Перевод кода с Pascal -> C++ |
|
C/C++ - Перевод кода с Pascal -> C++
|
Новый участник Сообщения: 2 |
Профиль | Отправить PM | Цитировать
ПОМОГИТЕ ПЕРЕВЕСТИ КОД С ПАСКАЛЯ НА СИ!!!!
uses crt; const n=20; var i,j,k,m,min:longint; a:array[1..n,1..n]of longint; begin clrscr; for i:=1 to n do for j:=1 to n do a[i,j]:=i*i*i+j*j*j;//создаем матрицу сумм кубов разумного предела до 20 min:=high(integer); //по двум направлениям ищем минимальное такое for i:=1 to n do for j:=1 to n do for k:=1 to n do for m:=1 to n do if(a[i,j]=a[k,m])and (i<>k)and (j<>m) //чтоб числа совпадали, а никакие номера не совпадали and(i<>m) and (j<>k) and (a[i,j]<min) then begin min:=a[i,j]; writeln('Chislo=',a[i,j],' 1var: ',i,'; ',j,' 2 var ',k,'; ',m); end; readln; end. помогите пожалуйста!!! |
|
Отправлено: 20:55, 24-11-2010 |
Старожил Сообщения: 295
|
Профиль | Отправить PM | Цитировать Паскаль - фигня. Какие строки непонятны?
|
Отправлено: 21:12, 24-11-2010 | #2 |
Для отключения данного рекламного блока вам необходимо зарегистрироваться или войти с учетной записью социальной сети. Если же вы забыли свой пароль на форуме, то воспользуйтесь данной ссылкой для восстановления пароля. |
Старожил Сообщения: 154
|
Профиль | Отправить PM | Цитировать Код для Visual Studio, строчки в комментах для Borland C.
#include <stdio.h> #include <windows.h> //#include<conio.h> int main() { const int n=20; int i,j,k,m,min; int a[n][n]; system("cls"); //clrscr(); for(i=1;i<=n;i++) for(j=1;j<=n;j++) a[i-1][j-1]=i*i*i+j*j*j; min=2e9; for(i=0;i<n;i++) for(j=0;j<n;j++) for(k=0;k<n;k++) for(m=0;m<n;m++) if(a[i][j]==a[k][m] && i!=k && j!=m && i!=m && j!=k && a[i][j]<min) { min=a[i][j]; printf("Chislo=%i 1var: %i;%i 2var %i;%i\n",a[i][j],i+1,j+1,k+1,m+1); } system("pause") //getch(); return 0; } |
Отправлено: 23:42, 24-11-2010 | #3 |
Новый участник Сообщения: 2
|
Профиль | Отправить PM | Цитировать Цитата belk94:
|
|
Отправлено: 06:47, 25-11-2010 | #4 |
Новый участник Сообщения: 15
|
Профиль | Отправить PM | Цитировать Maybe it's 2*2*2*2*2*2*2*2*2
|
|
------- Отправлено: 12:00, 25-11-2010 | #5 |
Старожил Сообщения: 295
|
Профиль | Отправить PM | Цитировать Цитата:
|
|
Отправлено: 19:46, 25-11-2010 | #6 |
Старожил Сообщения: 154
|
Профиль | Отправить PM | Цитировать |
Отправлено: 23:17, 25-11-2010 | #7 |
Старожил Сообщения: 295
|
Профиль | Отправить PM | Цитировать Цитата:
|
|
Отправлено: 19:10, 26-11-2010 | #8 |
Участник сейчас на форуме | Участник вне форума | Автор темы | Сообщение прикреплено |
| |||||
Название темы | Автор | Информация о форуме | Ответов | Последнее сообщение | |
C/C++ - Перевод с Pascal на C++ | Snake750 | Программирование и базы данных | 14 | 14-09-2015 04:48 | |
Разное - Всё о TURBO PASCAL (обсуждение, помощь в написание программ, ошибки, Pascal ABC) | Loading | Программирование и базы данных | 41 | 20-05-2015 15:28 | |
C/C++ - Перевод процедуры с Pascal на C++ | Snake750 | Программирование и базы данных | 56 | 05-04-2011 09:39 | |
Разное - перевести с кода C++ на Pascal... | radeon37 | Программирование и базы данных | 0 | 03-06-2010 12:20 | |
C/C++ - Перевод с Pascal на C++ | DimaZone88 | Программирование и базы данных | 0 | 13-05-2010 13:52 |
|