Собирается: некоторое кол-во файлов, собранных в папке обрабатывается: текстовый файл редактируется в word'е : сжатие информации в архив создается: создание текстового файла запоминается: текст, скопированый в буфер обмена измеряется: подсчет "веса" файла копируется: копирование картинки с пк на флешку принимается: скачивание картинки с интернета разрушается: удаление файла делится на части: развитие многовесной программы на два диска при записи ищется: поиск файла в проводнике/google'е
strelnikov-aa
25.02.2023
Var a: array [0..10] of integer; i, m: integer; begin for i : = 0 to 10 do begin a[i] : = random(50) - 25; writeln('[', i, '] => ', a[i]); end; for i : = 0 to 10 do if (abs(a[i]) > abs(a[m])) then m : = i; writeln('[', m, '] => ', a[m]); end.