Напиши наибольшее целое число Z, для которого истинно высказывание:
НЕ(Z< 3) И (Z < 8)

ответ:7

НЕ(Z< 3) И (Z < 8) - > z>=3 и z < 8 -> 3<=z<8

наибольшее число это 7

наименьшее 4-х разрядное число в системе счисления с основанием 5 = 1000₅.

наибольшее 4-х разрядное число в системе счисления с основанием 5 = 4444₅.

переведем эти числа в десятичную систему счисления:

1000₅= 5³ = 125

4444₅ = (10000₅ - 1₅) = 5⁴ - 1 = 624

количество всех 4-х разрядных чисел в системе счисления с основанием 5 равно: 624 - 125 + 1 = 500

ответ. 500. 

program n1;   const n=10;   var  mas: array[1..n] of integer;   i: integer;   max,min,sum: integer;   ar: real;   begin    for i: =1 to n dobegin  mas[i]: = random (20)-10;   write(mas[i],' ');   writeln  end;   max: =1;     for i: =2 to n do    if mas[i]> mas[max] then    max: =i;     writeln;     writeln('максимаьное значение a[',max,']= ',mas[max]);       min: =1;   for i: =2 to n do    if mas[i]< mas[min] then    min: =i;     writeln;     writeln(минимальное значение a[',min,']= ',mas[min]);       for i: =1 to n do    sum: =sum+mas[i];       ar: =sum/n;     writeln;     writeln('среднее арифметическое =  ',ar);     end.{немного нерационально но работает=)}