Const k=10;
type arr=array[1..k] of integer;
procedure p1(var x:arr);
var i:integer;
begin
for i:=1 to k do
begin
x[i]:=random(30)-15;
write(x[i]:3);
end;
writeln;
end;
function f1(var x:arr):integer;
var i,s:integer;
begin
s:=0;
for i:=1 to k do
if x[i]<0 then s:=s+x[i]*x[i];
f1:=s;
end;
var a,b:arr; m,n:integer; x:real;
begin
writeln('a:');
p1(a);
writeln('b:');
p1(b);
m:=f1(a);
n:=f1(b);
writeln('m = ',m,' n = ',n);
x:=m/(n-m);
writeln('x = ',x:6:4);
end.
Пример:
a:
<span>-13 7-11 11 -3 4 13 3 -1 2
b:
8 -2 5 10 9 8 -8 12 7-13
m = 300 n = 237
x = -4.7619</span>
Program a_1;
Var a,b : real;
begin
writeln('Введите 2 числа');
read(a,b);
if a > b then
Writeln('Число: ' +a+ ' Порядковый номер: 1')
else Writeln('Число: ' +b+ ' Порядковый номер: 2');
<span>end.
</span>
#include <iostream>
using namespace std;
int main()
{
int res=0,a[100],n;
cout<<"Input N"<<endl;
cin>>n;
cout<<"Input elements."<<endl;
for (int i=0;i<n;i++)
cin>>a[i];
for (int i=0;i<n-1;i++)
if (((a[i]>=0) && (a[i+1]<0)) || ((a[i]<0) && (a[i+1]>=0)))
res+=1;
cout<<res;
return 0;
}<span>
</span>
Для 8-битной кодировки:
Для одной страницы требуется 40*60*8 бит = 40*60 байт = 2400 байт
1 ТБ переводим в байты:
1 ТБ=1*1024 Гбайт = 1024*1024 Мбайт = 1024*1024*1024 Кбайт = 1024*1024*1024*1024 байт
Количество страниц: 1024*1024*1024*1024 / 2400 ≈ 458 129 844,9 страниц
Высота стопки: 458 129 844 / 100 *0,01 ≈ 45813 м = 45 км
1. Ссылка $A$1 - абсолютная и при копировании не меняется. Поэтому в B2 и B3 формула запишется без изменений. В В1 будет значение 20+1=21 и это же значение будет в B2-B3
Таблица примет вид
20 21
21
21
2. Формула $A$1+A1 содержит как абсолютную ссылку, так и относительную. Относительная при копировании будет меняться.
Вычисление по этой формуле в В1 даст значение 10+10=20.
При копировании В1 в В2 формула примет вид $1$1+A2 и её значение будет 10+20=30.
При копировании В1 в В3 формула примет вид $1$1+A3 и её значение будет 10+30=40.
Ответ: 30, 40