Напишите код Задание 1
Cоздайте новый проект в Tinkercad Circuits. Добавьте пла-
ту Arduino Uno и подключите 5 или больше светодиодов,
кнопку и LCD-дисплей. Запрограммируйте несколько режи-
мов для светодиодов:
1. Светодиоды мигают в случайном порядке;
2. Светодиоды включаются последовательно, один за другим;
3. Светодиоды медленно включаются, а затем гаснут.
Запрограммируйте кнопку, чтобы по нажатию на нее
менялся режим мигания светодиодов. Придумайте ориги-
нальное название для каждого из режимов и выводите его
на LCD-дисплей. То есть пользователь нажимает на кнопку,
меняется режим, на LCD дисплее отображается название ре-
жима.
Begin
Write('N = ');ReadLn(N);
Write('Искомые числа:');
For N:= 1 to N do
Begin
B:=N;
k:=1;
// перед каждой проверкой k:=1
// и если число не делится на любую из своих цифр, то k:=0
While B > 0 do
Begin
if B mod 10 = 0 then k:=0
// B mod 10 - это остаток от деления B на 10
// то есть, например, 123 mod 10 = 3
else if N mod (B mod 10) > 0 then k:=0;
B:=B div 10
// целая часть от деления B на 10
// 123 div 10 = 12
End;
if k = 1 then Write(' ',N)
End;
End.
2. Клод Шеннон - основатель теории информации .Приложил свои руки в инженерии, кибернетики, электротехнике, математике и теории информации. Разработал теорию связи кодирования. Создал промышленную радиоуправляемую игрушку , ввёл понятие "бит" - единица измерения. Отмечен многими наградами и премиями, и Нобелевской премией.
3. Тедом Нельсоном в 1965 году
4. Тим Бернерс-Ли в 1980 году