Https://www.schooltube.com/media/t/0_0nr3o1el
https://www.schooltube.com/media/t/0_72oyvwum
https://www.schooltube.com/media/t/0_t7oy7tql
https://www.schooltube.com/media/t/0_dj2c74z4
https://www.schooltube.com/media/t/0_oxkm0cin
https://www.schooltube.com/media/t/0_yfxyzufu
https://video.ibm.com/recorded/125812421
https://video.ibm.com/channel/ru3pmHxWjWt
https://www.schooltube.com/media/t/0_0luiwq7j
https://www.schooltube.com/media/t/0_4w46h0ag
https://www.schooltube.com/media/t/0_b02sffqd
https://www.schooltube.com/media/t/0_xwbanuwf
https://www.schooltube.com/media/t/0_4c8k6wcv
https://www.schooltube.com/media/t/0_pa3wz940
https://www.schooltube.com/media/t/0_8xoa22f1
https://www.schooltube.com/media/t/0_zua96772
https://www.schooltube.com/media/t/0_au4s97hg
https://www.schooltube.com/media/t/0_0fu0cknm
A(x1,y1)
B(x2,y2)
C(x3,y3)
program q;
var x1,x2,y1,y2,x3,y3:integer;
ab,ac,alp,bet,alfa,s:real;
begin
write('введите координаты точки A: ');
read(x1);
readln(y1);
write('введите координаты точки B: ');
read(x2);
readln(y2);
write('введите координаты точки C: ');
read(x3);
readln(y3);
ab:=sqrt(sqr(x2-x1)+sqr(y2-y1));
ac:=sqrt(sqr(x3-x1)+sqr(y3-y1));
alp:=arctan((y2-y1)/(x2-x1));
bet:=arctan((y3-y1)/(x3-x1));
alfa:=bet*2-alp;
s:=sin(alfa)*(ab*ac)/2;
writeln('площадь треугольника=',s);
readln
end.
cd ~
mkdir folder1
cd folder1
touch file1
touch file2
touch file3
touch file4
tar cvf archive.tar *
mkdir ../folder2
cd ../folder2
touch new_file
cp ../folder1/archive.tar .
tar rvf archive.tar new_file
tar vf archive.tar --delete file3
tar vf archive.tar --list > list1
tar vf ../folder1/archive.tar --list > list2
diff list1 list2
#Разъединение выполнить не получится, потому что все файлы пустые, но если засовывать не пустые, то
split -b 10M archive.tar "part" # вместо 10M нужный размер
cat part* > joined_archive.tar
tar vf archive.tar --list
tar vf joined_archive.tar --list
tar czvf final_archive.tar archive.tar ../folder1/archive.tar joined_archive.tar