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. подробнее - на -

k03a12345 k03a12345    2   21.05.2019 10:50    1

Другие вопросы по теме Информатика