Обе программы входят в пакет Microsoft Office. У них очень похож пользовательский интерфейс. В обоих программах можно писать и использовать макросы. В качестве внутреннего языка используется VBA - Visaul Basic for Applications. Фрагменты из Word и Excel можно просто перетаскивать мышкой между этими приложениями. Двойной щелчок по таблице Excel, вставленной в документ Word, вызывает Excel, позводяя в нем работать с такой таблицей. Аналогично обстоит дело с выховом Word из Excel.
Разница состоит в том, что все же Word - это текстовый процессор, предназначенный для работы с текстовыми документами, а Excel - средство для работы с электронными таблицами.
1) 22212 - 8/2=4 4/2=2 2/2=1 12 12/2=6, т.е. 8 преобразуется в 6
2) 1-12-6-3-32-16, т.е 12212
S=2
k=3
s=2+k(3)+2=7
Далее
S=7
k=4
s=2+k(4)+7=13
Далее
s=13
k=5
S=2+k(5)+13=20
Ответ S=20
Const
K = 3;
N = 4;
Var
A:array[1..K,1..N] of integer;
Max,Min,i,j:integer;
Begin
For i:= 1 to K do
Begin
For j:= 1 to N do
Begin
A[i,j]:=random(21)-10;
Write(A[i,j]:3,' ')
End;
WriteLn
End;
Max:=A[K,N];
Min:=A[K,N];
For i:= 1 to K do
For j:= 1 to N do
Begin
if Max<A[i,j] then Max:=A[i,j];
if Min>A[i,j] then Min:=A[i,j]
End;
WriteLn('Min = ',Min);
WriteLn('Max = ',Max);
End.
Пример:
-3 -2 5 -8
2 -3 7 5
-10 -2 7 4
Min = -10
Max = 7