Нашел код на паскале но мне надо его на питоне, напишите или объясните как делать??? const n = 7;
Var a:array[1..n,1..n] of integer; i,j,ts,smax,nmax:integer;
Begin
Randomize;
smax:=0;
For i:=1 to n do
Begin
For j:=1 to n do
a[i,j]:=random(100)-50;
End;

For i:=1 to n do
Begin
For j:=1 to n do
begin
write( a[i,j], ' ');
end;
writeln;
End;
smax := -1000;
nmax:=0;
For i:=1 to n do
Begin
ts:=0;
For j:=1 to n do
begin
ts := ts + a[i,j];
end;
if smax < ts then
begin
smax := ts;
nmax := i;
end;
End;
Writeln('max stroka: ',nmax,' summa:',smax); End.

235

243

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

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

drewetova

Информатика

4,4(70 оценок)

const n = 20;

var i, k: integer; m: array [1 n] of integer;

begin

randomize;

for i: =1 to n do begin

m[i]: =random (101) - 50;

writeln (m[i]) ;

end;

for i: =1 to n do

if m[i] mod 2 0 then

inc (k) ;

writeln ('kol-vo netchetnih = ', k) ;

readln;

end.

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

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

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

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

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

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