Зашифруйте по правилу из номер 19 слова информация правила алгоритм​

(12-3): (4+5)=1

1х2х3-4+5-6=1

(12: 3+4+5): (6+7)=1

(1+2-3+4+5+6-7): 8=1

месяцы,каждый месяц в каждом времени года-это и есть классификация

var a: array[1..15] of char;

i,min,max: integer;

begin

  min=1;

  max=1;

  for i: = 1 to 15 do begin

      a[i]: = chr(random(256));

      if a[min]> a[i] then min: =i;

      if a[max]< a[i] then max: =i;

  end;

  writeln(a[min], a[max]);

end.

pascal:

1) диапазоны не указаны, но для школы обычно хватает типа "integer".

var a, b, i: longint;

begin

  write('введите число n=> ');  

  readln(a);

  b: =1;  

  for i: =1 to a do

  b: =b*(i*i);

  write('произведение=', b, '.');  

readln end.