Перевести с pascal на c++ (код не мой):
uses crt;
const mmax=23;
nmax=18;
var a: array[1..mmax+1,1..nmax+1] of integer;
m,n,i,j,imn,imx: byte;
sm,sp: integer;
begin
clrscr;
randomize;
repeat
write('количество строк до ',mmax,' m=');
readln(m);
until m in [1..mmax];
repeat
write('количество столбцов до ',nmax,' n=');
readln(n);
until n in [1..nmax];
clrscr;
writeln('исходная матрица c суммами по строкам и столбцам: ');
for i: =1 to m do
for j: =1 to n do
a[i,j]: =random(50);
sp: =0;
for i: =1 to m do
begin
sm: =0;
for j: =1 to n do
sm: =sm+a[i,j];
a[i,n+1]: =sm;
sp: =sp+sm;
end;
for j: =1 to n do
begin
sm: =0;
for i: =1 to m do
sm: =sm+a[i,j];
a[m+1,j]: =sm;
end;
a[m+1,n+1]: =sp;
for i: =1 to m+1 do
begin
for j: =1 to n+1 do
if j=n+1 then write(a[i,j]: 7)
else write(a[i,j]: 4);
if i< =m then writeln;
end;
readln
end

168

266

Посмотреть ответы 1

Ответы на вопрос:

mariyamariya201

Информатика

4,7(34 оценок)

Переменная с - не изменится

Задай свой вопрос

Как otvet5GPT работает?

otvet5GPT использует большую языковую модель вместе с базой данных GPT для обеспечения высококачественных образовательных результатов. otvet5GPT действует как доступный академический ресурс вне класса.
Сколько это стоит?

Проект находиться на стадии тестирования и все услуги бесплатны.
Могу ли я использовать otvet5GPT в школе?

Конечно! Нейросеть может помочь вам делать конспекты лекций, придумывать идеи в классе и многое другое!
В чем отличия от ChatGPT?

otvet5GPT черпает академические источники из собственной базы данных и предназначен специально для студентов. otvet5GPT также адаптируется к вашему стилю письма, предоставляя ряд образовательных инструментов, предназначенных для улучшения обучения.