Алгоритм выполнения домашнего задания. Начало Взять дневник. Посмотреть домашние задания. Распланировать последовательность выполнения заданий. Распределить время выполнения. Открыть нужные учебники и тетради. Начать выполнять домашнее задание. После их выполнения сложить учебники и тетради в портфель. Конец. Алгоритм рецепта приготовления пирога. Начало. Налить 250 мл кефира в стакан. Взять 2 яйца. Взять 1 стакан муки. Взять 1 луковицу. Взять 1 картофелину. Взять 1 банку консервированной горбуши. Взять 1/2 ложки гашенной соды. Смешать в тарелке яйца, кефир, муку, соду. Замешать тесто. Нарезать картофель мелкой соломкой. Половину полученного теста вылить в форму для запекания. Выложить на него картофель. Обжарить лук до прозрачности. Разминаем горбушу. Кладем ее вместе с луком к картофелю. Заливаем полученное второй половиной теста. Разогреваем духовку до 180 градусов. Выпекаем 40 минут. Зубочисткой проверяем готовность пирога. Конец. Алгоритм мытья посуды. Начало. Берем губку. Наносим на нее моющее средство. Грязную посуду складываем в раковину. Протираем губкой посуду. Включаем воду. Смываем ею моющее средство с посуды. Складываем чистую посуду в шкаф. Конец. Алгоритм путешествия Колобка в известной сказке. Начало. Уйти от бабушки с дедушкой. Встретить зайца. Уйти от него. Встретить волка. Уйти от него. Встретить медведя. Уйти от него. Встретить лису. Поверить лисе. Оказаться съеденным. Конец.
Var mas: array[1..9] of integer; max, min, i, j, k, n: integer; begin writeln('Массив до перестановки'); for i := 1 to 9 do begin mas[i] := random(11) - random(11); write(mas[i], ' '); end; writeln; max := mas[1]; min := mas[1]; k := 1; j := 1; for i := 1 to 9 do begin if mas[i] > max then begin max := mas[i]; j := i; end; if mas[i] < min then begin min := mas[i]; k := i; end; end; n := mas[j]; mas[j] := min; mas[k] := n; writeln('Масств после перестановки'); for i := 1 to 9 do write(mas[i], ' '); end.
Начало
Взять дневник.
Посмотреть домашние задания.
Распланировать последовательность выполнения заданий.
Распределить время выполнения.
Открыть нужные учебники и тетради.
Начать выполнять домашнее задание.
После их выполнения сложить учебники и тетради в портфель.
Конец.
Алгоритм рецепта приготовления пирога.
Начало.
Налить 250 мл кефира в стакан.
Взять 2 яйца.
Взять 1 стакан муки.
Взять 1 луковицу.
Взять 1 картофелину.
Взять 1 банку консервированной горбуши.
Взять 1/2 ложки гашенной соды.
Смешать в тарелке яйца, кефир, муку, соду.
Замешать тесто.
Нарезать картофель мелкой соломкой.
Половину полученного теста вылить в форму для запекания.
Выложить на него картофель.
Обжарить лук до прозрачности.
Разминаем горбушу.
Кладем ее вместе с луком к картофелю.
Заливаем полученное второй половиной теста.
Разогреваем духовку до 180 градусов.
Выпекаем 40 минут.
Зубочисткой проверяем готовность пирога.
Конец.
Алгоритм мытья посуды.
Начало.
Берем губку.
Наносим на нее моющее средство.
Грязную посуду складываем в раковину.
Протираем губкой посуду.
Включаем воду.
Смываем ею моющее средство с посуды.
Складываем чистую посуду в шкаф.
Конец.
Алгоритм путешествия Колобка в известной сказке.
Начало.
Уйти от бабушки с дедушкой.
Встретить зайца.
Уйти от него.
Встретить волка.
Уйти от него.
Встретить медведя.
Уйти от него.
Встретить лису.
Поверить лисе.
Оказаться съеденным.
Конец.
mas: array[1..9] of integer;
max, min, i, j, k, n: integer;
begin
writeln('Массив до перестановки');
for i := 1 to 9 do
begin
mas[i] := random(11) - random(11);
write(mas[i], ' ');
end;
writeln;
max := mas[1];
min := mas[1];
k := 1;
j := 1;
for i := 1 to 9 do
begin
if mas[i] > max then
begin
max := mas[i];
j := i;
end;
if mas[i] < min then
begin
min := mas[i];
k := i;
end;
end;
n := mas[j];
mas[j] := min;
mas[k] := n;
writeln('Масств после перестановки');
for i := 1 to 9 do
write(mas[i], ' ');
end.