<span>3. Вибрати значок програми<span>
</span><span>1. Увімкнути живлення монітора та системного блока</span><span>
</span><span>6. Дочекатися завантаження вікна програми</span><span>
</span><span>4. Дочекатись, доки вказівник миші набере вигляду
стрілки</span><span>
</span><span>5. Двічі клацнути кнопкою миші</span><span>
</span><span>10. Клацнути на кнопці ПУСК</span><span>
</span><span>9. Дочекатись, доки вікно програми закриється</span><span>
</span><span>11. Обрати кнопку ЗАВЕРШЕННЯ РОБОТИ</span><span>
</span><span>12. Дочекатись, поки індикатор на системному блоці
не погасне</span><span>
</span><span>7. У вікні програми виконати вказівку ЗАКРИТИ</span><span>
</span><span>2. Дочекатись, доки відобразиться РОБОЧИЙ СТІЛ</span><span>
</span><span>8. <span>Якщо не передбачено окремого способу завершення
роботи програми, натиснути Закрити.</span></span></span>
Ответ: 2)
Если пойти
A-B-C-F=8
A-C-F=6
A-D-F=7
Получается самый короткий путь 6
Var a:integer;
begin
write('введите число ');
read(a);
if ((a div 10 + a mod 10) mod 3=0) writeln('YES') else write ('NO');
end.
Const
n = 10;
var
a: array[1..n, 1..n] of integer;
i, j, k, s: integer;
begin
Writeln('Сгенерированная матрица');
for i := 1 to n do
begin
for j := 1 to n do
begin
a[i, j] := abs(n - i - j + 1);
Write(a[i, j]:2)
end;
Writeln
end;
Write('Введите номер столбца (1-10): ');
Readln(k);
if not (k in [1..10]) then Writeln('Столбца с таким номером не существует')
else begin
s := 0;
for j := 1 to n do s := s + a[k, j];
Writeln('Сумма элементов по столбцу ', k, ' равна ', s)
end
end.
Тестовое решение:
Сгенерированная матрица
9 8 7 6 5 4 3 2 1 0
8 7 6 5 4 3 2 1 0 1
7 6 5 4 3 2 1 0 1 2
6 5 4 3 2 1 0 1 2 3
5 4 3 2 1 0 1 2 3 4
4 3 2 1 0 1 2 3 4 5
3 2 1 0 1 2 3 4 5 6
2 1 0 1 2 3 4 5 6 7
1 0 1 2 3 4 5 6 7 8
0 1 2 3 4 5 6 7 8 9
Введите номер столбца (1-10): 8
Сумма элементов по столбцу 8 равна 31