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.
Мой любимый предмет это - информатика! На уроках информатики мы познаём компьтерный мир. Сотни программ созданны для нашего поколения чтобы создавать различные презентации, мультфильмы, анимации, рисунки и много всего другого, что так-же нам интересно! Если почитать в интернете о данной науке, то мы можем сразу сделать вывод, что на самом деле придуманно очень большое кол-во программ и приложений. Мы можем узнать погоду, написать сочинение или реферат, подготовить презентацию, отправить любой файл через доступные приложения и программы, как на компьтере так и на телефоне, а самое главное всё отправляется в один миг - и получатель сообщения может сразу воспользоваться файлом. Существую так-же различные форматы файлов, для удобствия получать на любом устройстве. Насчёт данной науки я могу сказать так: наша цивилизация развивается очень быстро и в этом ей информатика!
APPLET
ANCHOR
AVATAR
ADSL
Автозагрузка
Архивация
Архиватор
Архив
Апгрейд
Апдейд
Администратор
Антивирус
Аборт
Вирус
Буфер обмена
База данных
Винчестер
Глюк
Драйвер
Гектар
Гифка
Зависание
Килобайт
Клава
Клик
Инъекция
Мышь
Операционная система