Вот тебе пример)
while not EOF(FTemp) do
begin
ReadLn(FTemp, S);
WriteLn(FT, S)
end;
{ Закрытие входного файла }
Close(FT);
{ Усечение размера временного файла до 0 }
Rewrite(FTemp);
{ Закрытие временного файла }
Close(FTemp)
end;
A:=16
b:=12-16/4 = 8
a:=16+8*3 = 40
Ответ: a=8; b=40
1) в
2) Измерения, выполненные автомотической космической станцией, помогают отследить изменения в земной коре, предсказать погоду.
3) а) если вычисляем по формуле S = (1 / 2) * a * h, то необходимо знать или найти сторону треугольника и высоту, к которой проведена высота;
б) все о работоспособности этого телефона, удобности в использовании, характеристиках и т.д.
<span>в) необходимо знать какие биологические процессы происходят в биологических и технических системах</span>
Убрала несколько блоков, т.к. считаю их лишними
For(i=0;i<a.length-1;i++){
for(j=0;j<a.length-i-1; j++)
if(a[j]>a[j+1])
swap(a[j],a[j+1]);
}