PascalABC.NET 3.3.5, сборка 1662 от 29.04.2018 Внимание! Если программа не работает, обновите версию!
begin var n:=ReadInteger('n='); WriteAllText('MyFile.txt',SeqRandom(n,-99,99).JoinIntoString); var (mn,mx):=(MaxInt,-MaxInt); foreach var line in ReadLines('MyFile.txt') do begin var a:=line.ToIntegers; (mn,mx):=(Min(a.Min,mn),Max(a.Max,mx)) end; Writeln('Cумма min+max = ',mn,'+',mx,' = ',mn+mx); ReadAllText('MyFile.txt').Println // контрольный вывод файла end.
1. переговоры в интернете не требуют встречи лицом к лицу, поэтому это экономит на переезд в другой город(страну) 2.дистанционное обучение- самообучение не находясь в школе Минусы- большую часть программы ребенок может не понять ребенок Плюсы- ребенок сможет пройти всю программу обучения не тратя деньги и энергию на поход в школу пешком или на автобусе Очное- ребенок учиться лицом к лицу с учителями и своими сверсниками минусы- трата время и денег на путь в школу плюсы- с объяснением учителей ребенок понимает большуу часть школьной программы
Program.fpssmole.fps