Я сделала ввод массива с клавиатуры, но ты можешь сделать его рандомными числами
const N=5;
var A: array [1..N] of real;
i: integer;
begin
writeln('Введите массив');
for i:=1 to N do
readln(A[i]);
writeln('Положительные элементы:');
for i:=1 to N do
if A[i]>0 then
writeln('A[', i, ']=', A[i]);
end.
Использовать Робот
алг
нач
нц 2 раз
нц 4 раз
закрасить
вниз
кц
нц 6 раз
закрасить
вправо
кц
нц 4 раз
закрасить
вверх
закрасить
кц
нц 4 раз
влево
кц
нц 2 раз
вниз
закрасить
кц
нц 2 раз
вправо
закрасить
кц
вверх
закрасить
нц 4 раз
если справа свободно и снизу свободно то
вправо
вниз
все
кц
кц
кон
Система-множество элементов,связанных между собой
Системный подход-направление исследования, в основе которого лежит рассмотрение объекта как целостного множества элементов
Структура
Системный эффект-возникновение у системы новых свойств за счет взаимодействия составляющих систему узлов.
Лицо!!!!!!!!!!!!!!!!!!!!!!!!