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

Program f777; varx: array[1..102] of integer; mult,max,i,num: integer; begin  for i: =1 to 6 do    readln(x[i]);       max: =x[1];       for i: =1 to 6 do    if max < x[i] then  begin    max: =x[i];     num: =i;   end;       num: =num+1;   mult: =1;       for i: =num to 6+num do  begin  if i = 6- num then    x[mult]: =0  else    x[mult]: =x[i];   mult: =mult+1;   end;     x.print(' ');     end.

Что бы мы делали без интернета? Я уверена, что мы просто стали бы больше обращаться к книгам, ходить в библиотеки, листать газеты и журналы, чтобы найти ответ на нужный вопрос. Мы стали бы гораздо больше разговаривать со знакомыми, а сейчас всю необходимую информацию и новости мы получаем из интернета. Мы наверняка нашли бы время просто поговорить о каких-то интересующих нас вопросах, не стали бы скачивать и смотреть фильмы, а прочитали бы ещё не одну интересную книгу. Наконец, мы стали бы больше обращать внимания на своих близких, ведь они так нужны нам, а мы им. Мы бы выбирались на природу значительно чаще, чем один раз в неделю, каждый день мы бы нашли время для прогулок, любовались бы соседним парком или стайкой слетевшихся птиц. Интернет отнимает у нас гораздо больше времени, чем нам кажется, и мы приобретаем информацию, но теряем своё время. Так мы и жили бы без интернета, ведь у нас появилось бы большое количество времени для себя, для своих близких и просто знакомых.♤♤♤♤♤