Program srednee; var a, b, c:integer; sa:real; begin write ('Введите а='); readln (a); write ('Введите b='); readln (b); write ('Введите c='); readln (c); if (a mod 5 = 0) and (b mod 5 <> 0) and (c mod 5 = 0) then begin a:= sqr(a); writeln ('Квадрат а=', a); b:= sqr(b); writeln ('Квадрат b=', b); c:= sqr(c); writeln ('Квадрат c=', c); end else begin if (a mod 5 <> 0) and (b mod 5 = 0) and (c mod 5 <> 0) then begin a:= a+10; writeln ('а+10=', a); b:= b+10; writeln ('b+10=', b); c:= c+10; writeln ('c+10=', c); end else begin sa:=(a+b+c)/3; write ('Среднее арифметическое =', sa); end end end.
1) перекодування даних, яке проводиться з метою зменшення їх об'єму, розміру, обсягу. 2) це процес стискування інформації (файлів, груп файлів, каталогів, цілих дисків) з метою економії дикого простору та захисту її від несанкціонованого доступу. 3) процес відновлення файлів з архіву в тому самому вигляді, який вони мали до упакування в архів 4) результат архівування 5) сучасні програмні засоби для створення та обслуговування архівів. 6) це архіви, до яких приєднано виконуваний модуль, що дозволяє витягати (розпаковувати) файли простим запуском архіву як звичайної програми (без програми-архіватора). 7)це архіви, що складаються з декількох частин (файлів), які називають томами 8)ZIP; RAR; RLE; CAB; GZIP, TAR
это всё еденицы измерения информации