Есть ответ 👍

Что выведет программа? А) A = [2, 3, 1, 4, 6, 5]
print( A[1]+2*A[4] )

В) a=[[11,12,5,2],[15,6,10],[12,15]]
print(a[1][2])

, очень нужно ​

164
416
Посмотреть ответы 1

Ответы на вопрос:

zavya55
4,5(88 оценок)

Var i,x,a,b,c,d,count: integer; begin count: =0; for i: =1000 to 9999 do begin a: =i div 1000; b: =(i div 100) mod 10; c: =(i mod 100) div 10; d: =i mod 10; if (a< > b) and (a< > c) and (a< > d) and (b< > c) and (b< > d) and (c< > d) then  if (a> b) and (b> c) and (c> d) then begin count: =count+1; write(i,' '); end; end;   writeln; writeln('количество: ',count); end.

Популярно: Информатика