98 переаедите с паскаля на питон program zadbl; uses crt; var a,b,c,i,s: integer; m: array[1..30] of integer; begin s: =-1; for i: =1 to 30 do begin m[i]: =random(100); write(m[i]: 3); end; for i: =1 to 28 do begin if m[i]+m[i+1]+m[i+2]> s then begin a: =m[i]; b: =m[i+1]; c: =m[i+2]; s: =a+b+c; end; end; writeln(' a b c'); write(a: 3); write(b: 3); write(c: 3); readln; end. подробнее - на -