Гигабайт??
8 бит = 1 байт
1024 байт = 1 килобайт
1024 килобайт = 1 мегабайт
1024 мегабайт = 1 гигабайт
const
n= 5;
var
i,j,max: integer;
a: array [1..5,1..5] of integer;
begin
for i:=1 to n do begin
for j:=1 to n do begin
a[i,j]:= random(10);
write(a[i,j],' ')
end;
writeln
end;
max:= a[n,1];
for i:=1 to n do
if a[i,n-i+1]>max then max:=a[i,n-i+1];
writeln(max)
<span>end.</span>
var
a, d, c, k: <em>real</em>;
begin
readln(a, d, c, k);
writeln((a - (d + 21) * 2) * (c - 7 * k));
end.
1. =ДЛСТР(A2)
2. =ЯЧЕЙКА("тип";A2)
или
=ТИП(A2)
3. Если приведенная таблица записана в диапазоне ячеек A2:H20; искомое значение кода (250) - в ячейке A22, то формула будет:
=ИНДЕКС(A2:H20;ПОИСКПОЗ(A22;A2:A20;0);5)