Розділ 1 2. Визначте, використовуючи текстовий редактор Блокнот, довжину
двійкового коду повідомлення Практична робота № 1 за умови, що
повідомлення закодоване з використанням таблиці кодів символів:
а) Windows-1251;
б) Юнікод.
Збережіть текстові документи з повідомленням у файлах з іменами
практична 1 Windows. txt та практична 1 Юнікод. txt.
3. Заповніть у табличному процесорі таблицю:
Bimie
Байтів
кілобайт
Мегабайт
614 400
524288
256
4
Как заделать паблтцу?? ​

var

v,p,n,h,d: real;

begin

read(p,n,h,d);

v: =3*p*n/10/10/10*h*d*d;

end.

сред. арифметическое = сумма всех чисел разделить на количество

(a1 + a2 + a3 + a4 + a5) / 5

1) элемент с номером k заменяется на 2

var

a: array [1..20] of integer;

i,n,k: integer;

begin

readln(n);

for i: =1 to n do

begin

a[i]: =random(50);

write(a[i]: 3);

end;

writeln;

readln(k);

a[k]: =2;

for i: =1 to n do

write(a[i]: 3);

end.

2) элемент вставляется в массив остальные элементы сдвигаются вправо

var a: array [1..20] of integer; i, n, k: integer;

begin readln(n); for i : = 1 to n do begin a[i] : = random(50); write(a[i]: 3); end; writeln; readln(k); for i: =n+1 downto k do a[i]: =a[i-1]; a[k] : = 2; for i : = 1 to n+1 do write(a[i]: 3); end.

1)никакие люди не повторят подвиг матросова!

2)все великие,учёные люди подвергались критике и злобе,но это делало их сильнее.

3)не все люди могут победить в себе страх и сдержать боль перед смертью как это сделал извейстнейший казак разин