<span>uses crt;
var r1,r2:real;
function Scirkle(r:real):real;
begin
Scirkle:=pi*sqr(r);
end;
begin
clrscr;
writeln('r1,r2');
readln(r1,r2);
writeln('Площадь кольца равна ',Scirkle(r1)-Scirkle(r2));
readln;
end.</span>
<span>В реальной жизни выполнение всяких действий связано с расходом различных ресурсов: материалов, энергии и времени. Даже производя какие-либо записи, мы расходуем ресурсы (например, бумагу, чернила и время). Еще недавно некоторые задачи нельзя было решить из-за слишком большого числа необходимых для этого операций и слишком малой скорости их выполнения. Появление электронных вычислительных машин сделало такие задачи разрешимыми. Это значит, что «математизируя» понятие алгоритма, нужно абстрагироваться, отвлечься от ограниченности ресурсов, требуя только их конечности, иначе теория алгоритмов устареет, как только развитие науки и техники позволит переступить через существующие границы ресурсов. Алгоритму в интуитивном смысле в книге противопоставляется алгоритм в математическом, или формальном смысле. В последнем случае считается, что понятие определено методами, принятыми в математике, и основывается либо на других понятиях, имеющих математическое определение, либо на первоначальных, описанных настолько четко, что их свойства могут быть приняты за аксиомы новой теории. Теорию алгоритмов, которой посвящена эта книга, мы называем содержательной в том смысле, что именно алгоритмы как таковые во всем их разнообразии являются ее предметом. В этом отношении она является противоположностью традиционных теорий, которые изучали вопросы существования и несуществования алгоритмов путем сведения вопросов к исследованию какого-либо одного узкого класса алгоритмов и потому очень многие важнейшие проблемы оставляли вне своего поля зрения.</span>
Var x,p,rez:real;
<span> n: integer;
</span><span>begin
</span><span> p:=1;
</span><span> write('числа через пробел (завершение ввода - 0): '); read(x);
</span><span> while x<>0 do
</span><span> begin
</span><span> p:=p*abs(x);
</span><span> read(x);
</span><span> end;
</span><span> write('N = '); readln(n);
</span><span> rez:=exp((1/n)*ln(p));
</span><span> writeln('корень ',N,' -ой степени из ',p,' = ',rez);
</span><span>end.
</span><span>
</span>
Ответ:
Так как язык не указан, предлагаю решения на 2х языках - Python и C#
<em>Python:</em>
def main():
marks = list(map(int, input().split()))
assert len(marks) == 10
return sum(marks)/10
if __name__ == '__main__':
print(main())
<em>C#</em>
using System;
namespace Global
{
class App
{
int[] marks = new int[10];
double summ = 0;
static void Main(string[] argv)
{
App Obj = new App();
Obj.Run();
}
public void Run()
{
for(int i = 0; i < 10; i++)
{
marks[i] = Convert.ToInt32(Console.ReadLine());
}
for (int i = 0; i<10; i++)
{
summ = summ + marks[i];
}
Console.WriteLine(summ / 10);
Console.ReadKey();
}
}
}
Объяснение:
На случай проблем с копированием кода оставляю ссылки на исходный код на сервисе pastebin.com:
Python: https://pastebin.com/a74HdSQU
C#: https://pastebin.com/6JQA5GvX
Обе программы протестированы и полностью выполняют поставленную задачу
А)передача по usb, интернет(соц сети,электронные почты)
б)жесткий диск,флеш накопители, сервер .
в)поиск контента может производится в интернете на различных сайтах,или в книгах.
г)обрабатывать информацию может человек с помощью компьютера