Даю 50+
Переведите код с Паскаля на С++
uses crt;
const nmax=20;
var a:array[0..nmax,0..nmax] of integer;
m,n,i,j,imx:byte;
mx,sm:integer;
begin
clrscr;
randomize;
repeat
write('Количество спортсменов до ',nmax,' n=');
readln(n);
until n in [1..nmax];
repeat
write('Количество попыток до ',nmax,' m=');
readln(m);
until n in [1..nmax];
writeln('Введите построчно через пробел результаты каждого спортсмена');
writeln('После каждой строки нажать Enter');
writeln('Таблица результатов:');
for i:=0 to n-1 do
for j:=0 to m-1 do
read(a[i,j]);
readln;
writeln;
mx:=0;imx:=0;
for i:=0 to n-1 do
begin
sm:=0;
for j:=0 to m-1 do
sm:=sm+a[i,j];
if sm>mx then
begin
mx:=sm;
imx:=i;
end;
end;
write('Максимальная сумма попыток=',mx,' у спортсмена ',imx+1);
readln
end.
i,j,c,k,n:integer; //целочислительные переменные
f:boolean;// логические переменные
begin // начало программы
writeln('vvedite razmer massiva'); //выводим текст
readln(n); //вводим переменную n
writeln('vvedite el-ty massiva'); //выводим текст
for i:=1 to n do //повторить n раз
begin write('a[',i,'] = ');readln(a[i]);end;
{отвратный кодстайл. В данном цикле заполняем массив n количеством элементов. Как будто нельзя было объявить динамический массив}
writeln('massiv'); //вывод текста
for i:=1 to n do write(a[i]:4); //выводим n элементов массива
writeln; //сносим строчку
k:=2; //k=2
while k<=n do //пока k меньше или равно n выполнять
begin //начало тела цикла
c:=a[k]; //с=a[k]
i:=1; //i=1
if c while f do //ОШИБКА, странное сочетание логического оператора и цикла с предусловием
begin //начало тела вложенного цикла, объявленного ошибочно
a[k-i+1]:=a[k-i];
{элементу массива a, индекс которого равен k-i+1 присваивается элемент массива a, индекс которого равен k-i, по сути, это просто сдвих массива на один элемент}
i:=i+1; //увеличение i на 1
f:=false; //f=ложь
if i if c end; //ОШИБКА, совсем упоротое сочетание условных операторов
a[k-i+1]:=c;
{элементу массива a, индекс которого равен k-i+1 присваивается c}
k:=k+1; //k увеличивается на 1
{ //комментарий как у меня
for i:=1 to n do write(a[i]:4); //снова вывод от 1 до n элементов массива
writeln; //сноска строки
}
end; //выход из вложенного цикла
//нет выхода из основного цикла
//нет завершения программы
//Абсолютно нерабочий код
//Сожгите автора как ведьму