Текст, набранный на компьютере, содержит 3 страницы, на каждой странице 16 строк, в каждой строке 128 символов. Определите информационный объём текста в кодировщике КОИ-8, в которой каждый символ кодируется 8 битами. ответ дайте в КБАЙТАХ.
Var matrix1:array [,] of real; n:integer; tmp:real; begin write('Введи размерность матрицы:'); readln(n); matrix1:=new real[n,n]; for var i:=0 to n-1 do begin for var j:=0 to n-1 do begin matrix1[i,j]:=Random(100); write(matrix1[i,j]:4); end; writeln; end; writeln('Поменяли:'); for var j:=0 to n-1 do begin tmp:=matrix1[j,n-1]; matrix1[j,n-1]:=matrix1[n-1,j]; matrix1[n-1,j]:=tmp; end; for var i:=0 to n-1 do begin for var j:=0 to n-1 do write(matrix1[i,j]:4); writeln; end; end.
begin
write('Введи размерность матрицы:');
readln(n);
matrix1:=new real[n,n];
for var i:=0 to n-1 do begin
for var j:=0 to n-1 do
begin
matrix1[i,j]:=Random(100);
write(matrix1[i,j]:4);
end;
writeln;
end;
writeln('Поменяли:');
for var j:=0 to n-1 do
begin
tmp:=matrix1[j,n-1];
matrix1[j,n-1]:=matrix1[n-1,j];
matrix1[n-1,j]:=tmp;
end;
for var i:=0 to n-1 do begin
for var j:=0 to n-1 do
write(matrix1[i,j]:4);
writeln;
end;
end.
#include <iostream>
using namespace std;
int main()
{
//объявление переменных
float xa, ya, xb, yb, ab ;
//ввод переменных
cout<<"Vvedite xa: "<<endl;
cin>>xa;
cout<<"Vvedite ya: "<<endl;
cin>>ya;
cout<<"Vvedite xb: "<<endl;
cin>>xb;
cout<<"Vvedite yb: "<<endl;
cin>>yb;
//расчет длинны отрезка
ab=sqrt(pow(xa-xb,2)+pow(ya-yb,2);
//вывод длины отрезка
cout<<"|AB| = "<<ab<<endl;
system("pause");
return 0;
}