Ответ: в любой сфере информационной деятельности
<span>from random import randint
mas = [randint(50,100) for i in range(10)]
print(mas,'\nSuma',sum(mas))</span>
Программа для решения задачи - в прилагаемом файле. Только размерность там не 20*30, а 5*4 (чтобы легче проверять было).
Ответ:
program tt;
uses wincrt;
var
chislo,a,b,c:integer;
begin
ClrScr;
writeln('Введите число:');
readln(chislo);
a:=chislo div 100;
b:=(chislo mod 100) div 10;
c:=chislo mod 10;
if (a=b) or (a=c) or(b=c) then
writeln('Есть!')
else
writeln('Нет!');
readln;
end.
Объяснение: