1) 15,18,21,24... 2) -24. ,- 26
1
использовать Робот
алг
нач
цел а,с
нц для с от 1 до 3
нц для а от 1 до 5
закрасить
вправо
кц
нц для а от 1 до 5
влево
кц
нц для а от 1 до 5
закрасить
вниз
кц
нц для а от 1 до 5
вверх
кц
вправо
вниз
кц
кон
<span>
2
использовать Робот
алг
нач
цел а,с
нц для с от 1 до 3
нц для а от 1 до 5
закрасить
вправо
кц
нц для а от 1 до 5
влево
кц
нц для а от 1 до 5
закрасить
вниз
кц
нц для а от 1 до 5
вверх
кц
вправо
вправо
вниз
кц
кон<span>
</span></span>
Целая-часть (неделя-день недели)
род-вид (цветок-маргаритка)
последовательность (среда,четверг)
<span>причина-следствие (жара-жажда)</span>
Var i, min, max: integer;
function f(n: integer):integer;
begin
f:=n*n-4*n+3;
end;
begin
min := f(1);
max := f(1);
for i:=1 to 3 do
begin
if f(i) > max then max := f(i);
if f(i) < min then min := f(i);
end;
writeln(min, ' ', max)
end.