1.const n=7;var a:array[1..n] of integer;i:integer;beginRandomize;writeln('Температура за неделю:');for i:=1 to n do begin a[i]:=random(21)-30; write(a[i]:5); end;writeln;end.Пример:Температура за неделю: -13 -20 -14 -25 -26 -30 -172.var a,b:integer;begina:=random(90)+10;b:=random(90)+10;writeln('a = ',a,' b = ',b);writeln('Сумма = ',a+b);writeln('Разность = ',abs(a-b));writeln('Произведение = ',a*b);end.Пример:a = 11 b = 38Сумма = 49Разность = 27Произведение = 4183.const n=10;var a:array[1..n] of integer;i:integer;beginRandomize;for i:=1 to n do begin a[i]:=random(19)+7; write(a[i]:3); end;writeln;end.Пример: 24 21 25 7 24 16 18 21 14 25