ответ:использовать Чертежник
алг задача
нач
цел а
ввод а
сместиться в точку (1,1)
если а >= 0
то
нц 1 раз
фигура
кц
иначе
фигура
все
поднять перо
фигура
сместиться в точку (7,1)
фигура
сместиться в точку (14,1)
фигура
кон
алг фигура
нач
опустить перо
выбрать чернила (жёлтый)
сместиться на вектор (4,0)
сместиться на вектор (-2,3)
сместиться на вектор (-2,-3)
поднять перо
опустить перо
сместиться на вектор (4,0)
сместиться на вектор (0,4)
сместиться на вектор (-4,0)
сместиться на вектор (0,-4)
поднять перо
кон
Объяснение: Все в скирине
a b (А V B) ⋀ A
0 0 0
0 1 0
1 0 1
1 1 1
a b ¬А ⋀ B V B
0 0 0
0 1 1
1 0 0
1 1 1
a b c ¬(А V B) ⋀ C
0 0 0 0
0 0 1 1
0 1 0 0
0 1 1 0
1 0 0 0
1 0 1 0
1 1 0 0
1 1 1 0
Объяснение:
Внимание! Если программа не работает, обновите версию!
begin
Writeln('S=',SeqGen(ReadInteger('n='),i->Sqr(i+1)).Sum)
end.
Пример
n= 10
S=385