Составить программы для 3 – 5 3. найти сумму чётных чисел из натурального ряда от 1 до 1000? 4. дано nчисел. написать программу, находящую номер самого большого числа. 5. в кассе имеются купюры достоинством в к рублей и 1 рубль. выдать n рублей минимальным набором купюр заданного достоинства. кому не сложно (

3. var s,i: integer; begin s: =0; for i: = 1 to 1000 do       if i mod 2 = 0 then s: =s+i; writeln('s = ',s) end. результат работы программы: s = 250500 4. var     n,a,i,max: integer; begin write('n = '); readln(n); write('введите целые числа(',n,' шт.): '); read(max); i: =1; for n: = 2 to n do       begin       read(a);       if a > max then             begin             max: =a;             i: =n             end;       end; writeln('максимум: ',max); writeln('номер максимума: ',i); end. пример работы программы: n = 7 введите целые числа(7 шт.): 1 2 3 5 9 4 7 максимум: 9 номер максимума: 5 5. var k,n: integer; begin write('k = '); readln(k); write('n = '); readln(n); writeln('количество купюр по ',k,' руб.: ',n div k); writeln('количество купюр по 1 рублю: ',n mod k); end. пример работы программы: k = 38 n = 3000 количество купюр по 38 руб.: 78 количество купюр по 1 рублю: 36

ответ:Во многих задачах нужно переставлять элементы массива, т. е. требуется менять местами значения двух ячеек памяти.

Представьте себе, что в кофейной чашке налит сок, а в стакане — кофе, и вы хотите, чтобы было наоборот. Что вы сделаете?

Вернёмся к программированию. Чтобы поменять местами значения двух переменных — а и b, нужно использовать третью переменную того же типа:

с:=а с:=а;

а:=b а:=b;

b:=с b:=с;

Перестановка двух элементов массива, например А [i] и А [к], выполняется так же:

с:=А[i] с:=А[i];

А[i]:=А[k] A[i]:=А[к];

А[к]:=с А[к]:=с;

Объяснение: