1. Взять чайник
2. Зажечь газ
3. Поставить на газ чайник
4. Открыть тумбочку
5. Взять пачку чая
6. Достать пакетик чая
7. Достать чашку
8. Взять чайник
9. Налить в чашку кипяток
10. Сунуть и высунуть пакетик чая (повторять до почернения воды)
11. Добавить сахар
12. Перемешать
13. Подуть или подождать, пока чай остынет
14. Выпить чай
256000 * 180 = 46080000 бит = 5760000 байт = 5625 Кбайт
А2=2
В2=2+5=7
Ответ 7
.........
Если элемент стоит выше главной диагонали, то его номер столбца больше, чем номер строки.
Программа будет такая:
PROGRAM Matrix77
var A: array [1..7][1..7] of real; // Объявляем переменные
var i, j: integer
BEGIN
crt;
for i:= 1 to 7 do
begin
for j:=1 1 to 7 do read (A[i][j]); // Вводим начальный массив
readln;
end;
for i:= 1 to 7 do
begin // Проверяем, что элемент выше диагонали
for j:=1 1 to 7 do if j > i then A[i][j]:=0; // Обнуляем его
end;
for i:= 1 to 7 do
begin
for j:=1 1 to 7 do write (A[i][j]); // Выводим конечный массив
writeln;
end;
END.
Использовать Робот
алг
нач
нц пока не слева свободно и не сверху свободно
если не слева свободно и не сверху свободно то
закрасить
вниз
все
кц
нц пока не слева свободно и снизу свободно
вниз
кц
нц
пока не слева свободно и не снизу свободно
закрасить
вправо
кц
нц
пока не снизу свободно и справа свободно
вправо
кц
нц
пока не справа свободно и не снизу свободно
закрасить
вверх
кц
нц
пока не справа свободно и сверху свободно
вверх
кц
закрасить
нц пока не сверху свободно и слева свободно
влево
кц
кон
