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

С Паскаля на С++ - C++

Восстановить пароль Регистрация
 
PIVEHb
0 / 0 / 0
Регистрация: 03.06.2013
Сообщений: 23
17.06.2013, 12:53     С Паскаля на С++ #1
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
program Matrix25;
var
MAx,Sum,num,j,i,M,N:integer;
a: array [1..10,1..10] of integer;
begin
// Ввод данных 
writeln('Введите числа M (M<=10) и N (N<=10)');
 read(M); readln(N);
writeln('Введите по ',N,' элементов ');
for i:=1 to M do begin
write(i,' строки : ');
for j:=1 to N do read(a[i,j]);
end;
// Решение 
writeln;
writeln('Ответ');
for j:=1 to N do begin Max:=Max+a[1,J]; end;
num:=1;
for i:=2 to M do
begin
Sum:=0;
for j:=1 to N do
begin
Sum:=sum+a[I,J];
end;
if Sum> max then begin max:=sum; num:=i; end;
end;
// Ответ 
writeln('номер строки с наибольшей суммой элементов ',num);
writeln('суммa элементов ',max);
end.
 Комментарий модератора 
Пользуйтесь тегами форматирования кода.
Similar
Эксперт
41792 / 34177 / 6122
Регистрация: 12.04.2006
Сообщений: 57,940
17.06.2013, 12:53     С Паскаля на С++
Посмотрите здесь:

C++ с паскаля на с++
из паскаля в с++ C++
C++ C Паскаля на С++
С Паскаля на С++ C++
С паскаля на с++ C++
После регистрации реклама в сообщениях будет скрыта и будут доступны все возможности форума.
SatanaXIII
Супер-модератор
Эксперт С++
 Аватар для SatanaXIII
5549 / 2563 / 233
Регистрация: 01.11.2011
Сообщений: 6,334
Завершенные тесты: 1
17.06.2013, 13:30     С Паскаля на С++ #2
По чем купил по том продал.
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
#include <iostream.h>
//program Matrix25;
//var
int MAx,Sum,num,j,i,M,N;//MAx,Sum,num,j,i,M,N:integer;
int a[9][9]//a: array [1..10,1..10] of integer;
{//begin
// Ввод данных 
cout << "Введите числа M (M<=10) и N (N<=10)";//writeln('Введите числа M (M<=10) и N (N<=10)');
 cin >> M >> N;//read(M); readln(N);
cout << "Введите по ',N,' элементов ";//writeln('Введите по ',N,' элементов ');
for(i=0; i<M; i++)//for i:=1 to M do begin
cout << i <<" строки : ";//write(i,' строки : ');
for(j=0; j<N; j++) cin >> a[i][j];//for j:=1 to N do read(a[i,j]);
}//end;
// Решение 
cout << endl;//writeln;
cout << "Ответ";//writeln('Ответ');
for(j=0; j<N; j++) {Max = Max+a[1][J]}//for j:=1 to N do begin Max:=Max+a[1,J]; end;
num = 1;//num:=1;
for(i=2; i<M; i++)//for i:=2 to M do
{//begin
Sum = 0;//Sum:=0;
for(j=0; j<N; j++)//for j:=1 to N do
{//begin
Sum = sum+a[I][J];//Sum:=sum+a[I,J];
}//end;
if(Sum>max){max=sum; num=i;}//if Sum> max then begin max:=sum; num:=i; end;
}//end;
// Ответ 
cout << "номер строки с наибольшей суммой элементов " << num";//writeln('номер строки с наибольшей суммой элементов ',num);
cout << "суммa элементов + << max";//writeln('суммa элементов ',max);
}//end.
PIVEHb
0 / 0 / 0
Регистрация: 03.06.2013
Сообщений: 23
17.06.2013, 13:44  [ТС]     С Паскаля на С++ #3
Не роботает(
SatanaXIII
Супер-модератор
Эксперт С++
 Аватар для SatanaXIII
5549 / 2563 / 233
Регистрация: 01.11.2011
Сообщений: 6,334
Завершенные тесты: 1
17.06.2013, 14:02     С Паскаля на С++ #4
Цитата Сообщение от PIVEHb Посмотреть сообщение
Не роботает(
Странно. У меня тоже не работает. Давайте разбираться вместе! Что не работает у вас?
P.S. Историческая справка: Си, в отличие от паскаля, чувствителен к регистру. А это значит, что для него Max, mAx и MAx будут три разные переменные.
Так что именно у вас не работает?
Yandex
Объявления
17.06.2013, 14:02     С Паскаля на С++
Ответ Создать тему
Опции темы

Текущее время: 06:13. Часовой пояс GMT +3.
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin® Version 3.8.9
Copyright ©2000 - 2016, vBulletin Solutions, Inc.
Рейтинг@Mail.ru