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

#python 3 from random import randrange arr = list() for i in range(10):     arr.append(randrange(1, 100)) max_i = arr.index(max(arr)) min_i = arr.index(min(arr)) arr[max_i] = min(arr) arr[min_i] - min(arr) for i in arr:     print(i)

паскаль:

 

uses crt;

var a,b: string; \ а-слово ,b-символ

i: integer; \ переменная для счета

begin

writeln ('слово и символ');

readln (a,b); \\ввод данных

 

for i: =1to length(a) do if copy (a,i,1)=b then writeln (i); \\копирование по порядку символов слова а   и сравнение каждого с символом b. вывод ответа. или ответов 

readkey; \\если символы в слове повторяются

end.

 

 

var ch,n,i: longint;

ch1,s: string;

begin

  read(s,ch);

  n: =length(s);

  writeln(n,' ',ch);

  str(ch,ch1);

  for i: =1 to n do if s[i]=ch1 then write(i,' ');

end.