1. Разностная машина Беббиджа должна была заменить группу вычислителей, которые аккуратно склвдывали и вычитали числа. Поэтому утверждение "Б" - справедливо 2. Подготовка данных с перфокарт, утверждение "А" - справедливо. 3. Утверждение "Г" - спорно, хотя в 2000 году в лондонском Музее науки заработал принтер, придуманный Бэббиджем для своей машины.
Вообще машина проектировалась как механический аппарат предназначенный для автоматизации вычислений путем аппроксимации функций многочленами и вычисления конечных разностей.
Var ma:array[1..n,1..n] of integer; i,j,max,maxj,a:integer; begin max:=-1; randomize; writeln('Matrix:'); for i:=1 to n do begin; for j:=1 to n do begin; ma[i,j]:=random(10); write(ma[i,j]:4); end; writeln; end; for j:=1 to n do begin for i:=1 to n do a:=a+ma[i,j]; if a>max then begin max:=a; maxj:=j; end; a:=0; end; write('Максимальный по сумме столбец:',maxj); end.
s = 0 ( s = 0 ( создается переменная 's' котррая равнается 0))
for k in range(-3,6): ( создается цикл for которий называется 'k' и в нем создаются числа от -3 до
6 )
s = s + k ( и типерь переменная 's' ровнается
0 + 'k' )
(еще лутше написать s = s + int(k))