<em>// PascalABC.NET 3.2, сборка 1403 от 16.03.2017</em>
begin
var i:=10;
while i>=1 do begin
Writeln(i);
Sleep(1000); // пауза 1с
i:=i-1
end;
Writeln('Пуск!')
end.
<u>Результат</u>
10
9
8
7
6
5
4
3
2
1
Пуск!
Вставить установочный диск/флешку с Windows, и восстановить. Эта проблема означает что у вас нету точки восстановления. Лучше включить что бы в будущем не было таких проблем
<span>Я пологаю вы работаете с Exel.
Для начала напротив клетки "Площадь", вычислите площать вставив функцию суммы.
В
след клетке сложите весь объём так, вставкой математической функции,
потом выделив графу глубины и все данные используйте функцию MAX
ПОтом выделеите все клетки напротив "напор" и используйте функцию MIN</span>
A:=x+1/x-1
b:=a;
for i:=1 to x do b:=b*a;
b:=b+18*x*(y*y);