Составте программу, которая заполняет массив а[1..10] случайными целыми числами в диапазоне от 0 до 10 и находит сумму минимального и максимального элементов массива.

Var i,min,max: integer; a: array[1..10] of integer; begin min: =10; for i: =1 to 10 do   a[i]: = random(11); for i: =1 to 10 do   begin     if a[i]> max then max: =a[i];     if a[i]< min then min: =a[i]; end; writeln(min+max); end.

1. uses crt; var a,b,c,d,e,f: integer; begin writeln ('vvedite 5 chisel'); read (a,b,c,d,e); f: =a*b*c*d*e ; if (f mod a)=0  then writeln ('delitsa')  else writeln ('nedelitsa'); end.по поводу второй, не уверен, если под суммой квадратов цифр подразумевается 10 = 1*1+0*0, то эта программа неправильна, её нужно переписать будет.  uses crt; var a,i,s,t,t1: integer; beginfor i: =10 to 99 do begint: =i div 10; t1: =i mod 10 ;   if (sqr(t)+sqr(t1)) mod 15 = 0  then s: =s+1;   end;   writeln (s); end.

Переменная  — это именованная область памяти для хранения данных, которые могут изменяться в процессе исполнения программы.переменная характеризуется: именем («обозначением ячейки памяти»)значением (данными, содержащимися в переменной в конкретный момент времени)типом (определяющим: а) какие значения может принимать переменная; б) какие операции можно производить с этими значениями; в) как данные представлены в памяти компьютера) имена и типы переменных указываются в разделе описаний и не могут изменяться в процессе выполнения программы.