1)написать программу на языке паскаль, которая вычисляет среднее арифметическое пяти любых чисел. 2) написать программу на языке паскаль, вычисляющую корни квадратного уравнения.

1) program average; var     i: integer;     answer,  s, tmp: real; begin     for i : = 1 to 5 do     begin         readln(tmp);         s : = s + tmp       end;     answer : = s  / 5;     writeln(answer) end. 2) program  equation; var     a, b, c, d, x1, x2: real; begin       writeln('ввеедите коэфициенты квадратного многочлена');       readln(a);       readln(b);       readln(c);     if a < >   0 then      begin      d : = b*b - 4*a*c;       if d < 0 then         writeln('действительных корней нет')     else if d = 0 then     begin         x1 : = -b/(2*a);         writeln('единственный корень:   ',x1)     end else     begin         x1 : = (-b + sqrt(d))  /  (2*a);         x2 : = (-b - sqrt(d))  /  (2*a);         writeln('два корня:   ',x1,', ',x2)       end;     end         else writeln('старший коэфициент не может равняться 0') end.

Разумеется ведь компьютеру, для того что бы он работал как мы хотим нужна система своего рода программы которые будут следить за курсором, следить за тем нажата ли кнопка на клавиатуре или нет таких программ много, но их нужно ведь где-то хранить вот и для этого и существует внешняя память на ней хранится система, если вам интересно и у вас windows то откройте мой компьютер и зайдите на диск с это обычно главный диск далее найдите папку windows и нажмите на него правой кнопкой мыши выберите свойства и вы увидите сколько весит система

Можно  так. цифрой обозначаем  порядок в  котором она стоит, а количеством  обозначаем саму  цифру тоет: десятичное  число  : запись в нашей десятичной сс. 3: 111 14: 21111 102: 311 302051: 12222244666  (система  непозиционная,  так  что  порядок  седования  цифр  не  имеет  значение) если надо записать число в котором цифр больше десяти, то перем буквы латинского алфавита по порядку 213541123451324: 1111223334555556666777889abbccccdddddeeefgg