В далекие времена, когда еще не существовало современных технологий, людям приходилось быть весьма практичными, поэтому для бытовых нужд использовались самые неожиданные предметы. Для письма в Древней Индии приспосабливали, например, камни, и очень часто - пальмовые листья, поскольку те были более удобными.Первоначально листья высушивали, а после этого нарезали длинными и узкими кусочками. Чаще всего использовали листья пальмы талипот, которые можно было легко размягчить перед сушкой.
I,k:integer;
begin
randomize;
writeln('Массив:');
for i:=1 to 13 do
begin
a[i]:=random(41)+10;
write(a[i],' ');
end;
writeln;
writeln('Массив после удаления 10-го элемента:');
for i:=10 to 12 do
a[i]:=a[i+1];
for i:=1 to 12 do
write(a[i],' ');
writeln;
writeln('Массив после удаления минимального элемента: ');
k:=1;
for i:=1 to 12 do
if a[i]<a[k] then k:=i;
for i:=k to 11 do
a[i]:=a[i+1];
for i:=1 to 11 do
write(a[i],' ');
writeln;
end.
var
a:array [1..7] of char;
i,k:integer;
begin
writeln('Введите массив:');
for i:=1 to 7 do
readln(a[i]);
writeln('Массив');
for i:=1 to 7 do
write(a[i],' ');
writeln;
writeln('Массив после удаления максимального элемента: ');
k:=1;
for i:=1 to 7 do
if a[i]>a[k] then k:=i;
for i:=k to 6 do
a[i]:=a[i+1];
for i:=1 to 11 do
write(a[i],' ');
writeln;
end.
Если всё выше написанное целостная задача, то ответ нет. Есть вероятность, что среди этих оценок есть тройки.
1) колобок, монета, барабан
2)
топор
лейка
прорубь
ёж
Копейка рубль бережёт