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
Обычно предполагается, что нам известны какие-либо начальные данные. Тогда для простоты, буду считать что нам известно основание и высота к этому основанию. В таком случае
S = основание * высоту / 2
Что нужно сделать?
1) Запросить у пользователя ввод длины основания
2) Запросить у пользователя ввод длины высоты
3) Вычислить площадь
4) Вывести площадь на экран
Определимся с данными. У нас будет переменная S, основания и высоты. Все будут real, ведь пользователь может ввести и не целое число.
program ploshad;
var S, osnovanie, visota:real;
begin
writeln('Вычисление площадь треугольника по основанию и высоте');
writeln('Введите длину основания ');
read(osnovanie);
writeln('Введите длину высоты ');
read(visota);
S:=osnovanie*visota/2;
writeln('Площадь треугольника = ',S);
end.
s:integer;
begin
readln(S);
s:=s div 10;
writeln(s);
end.