Var
i : integer;
count : real;
begin
count := 370000;
for i := 2014 to 2030 do
begin
writeln('Год ', i, ': ', Round(count));
count := count + count * 3 / 100;
end;
<span>end. </span>
Var
i, sum, beg:integer;
str:string;
begin
sum:=0;
beg:=1;
readln(str);
for i:=1 to Length(str) do
if str[i]='+' then
begin
sum:=sum+StrToInt(Copy(str, beg, i-beg));
beg:=i+1;
end;
sum:=sum+StrToInt(Copy(str, beg, Length(str)));
writeln(sum);
end.
Если,у тебя есть компьютер,то это- собственно, это и есть компьютер, по крайней мере, его самая наиважнейшая составляющая. В системном блоке размещены основные устройства приема, передачи, обработки и хранения информации. Именно к нему подключаются все, без исключения, устройства компьютера, например, монитор, клавиатура, принтер.(он может находиться на полу так же и на столе у кого как у меня на полу к примеру в нём ещё есть дисковод))
<span>Термин “алгоритм управления” применяется здесь в значении определенной последовательности действий, выбираемой руководителем или группы управления с целью преобразования исходной ситуации в желаемый, соответствующий поставленной цели результат. “Алгоритмизация” деятельности применима к любой из рассмотренных функций управления и призвана ответить на вопрос, какие именно действия должны быть включены в стратегию управления при осуществлении той или иной функции.</span><span>Выбор того или иного алгоритма определяется степенью заданности проектной ситуации. Бывают ситуации, в которых процесс управления происходит в знакомых ситуациях, когда эта заданность практически исключает необходимость новаторской деятельности. В таких ситуациях эффективным может быть алгоритм управления, называемый линейным. Этот алгоритм отражает управление, состоящее из цепочки последовательных действий, в которой каждое действие зависит от исхода предыдущего, но не зависит от результатов последующих действий.</span><span>Если после получения результатов на одной из стадий приходится возвращаться к одному из предыдущих этапов, то такой алгоритм становитсяциклическим.</span><span>В управленческих задачах, когда функции отдельных структур управления не совпадают, может иметь место так называемый разветвленный алгоритм.Особенность этого алгоритма является то, что в него могут входить параллельные этапы, очень выгодные в том отношении, что позволяют увеличить количество структур и людей, одновременно выполняющих задачу.</span><span>Кроме того, в таких алгоритмах могут содержаться конкурирующие этапы, которые позволяют в определенной степени видоизменять стратегию в соответствии с исходом предыдущих этапов.</span><span>Адаптивные алгоритмы отличаются тем, что в них с самого начала определяется только первый шаг, первое действие. На всех последующих шагах выбор каждого действия зависит от результатов предшествующего шага алгоритма. В принципе, такая стратегия представляется наиболее предпочтительной, поскольку схема поиска всегда определяется на основе наиболее полной информации.</span><span>Недостаток адаптивных алгоритмов состоит в невозможности предвидеть и контролировать затраты и сроки выполнения проекта.</span>
<u>PascalABC.NET 3.3.5, сборка 1640 от 17.03.2018</u>
<u>Внимание! Если программа не работает, обновите версию!</u>
begin
var a:=ReadlnString;
var (m,n):=ReadInteger2('Введите через пробел m и n:');
Swap(a[m],a[n]); a.Println;
end.
<u>Пример</u>
Информатика
Введите через пробел m и n: 5 2
Ирфонматика