//PascalABC.NET
uses GraphABC;
var c: integer;
begin
window.IsFixedSize := true;//запрет изменения размера экрана
window.Clear(cllightblue);//очистка экрана синим цветом
pen.Color := clred;//меняем цвет пера на красный
for var i := 0 to 19 do//цикл для отрисовки линий
begin
c := (window.Height div 19) * i;//сдвиг линнии по y
line(0, 0 + c, window.Width, window.Height - c);//рисуем линию
end;
end.
Объяснение:
uses graphabc;
begin
circle(50,50,50);
circle(50,50,20);
circle(150,50,50);
circle(150,50,20);
circle(250,50,50);
circle(250,50,20);
circle(350,50,50);
circle(350,50,20);
circle(450,50,50);
circle(450,50,20);
circle(550,50,50);
circle(550,50,20);
end.
Нормально?
Объяснение:
День безпечного Інтернету відзначають щороку в другий день другого тижня другого місяця. Це міжнародне свято запровадили у 2004 році мережі Insafe та INHOPE за підтримки Європейської комісії для просування безпечного та позитивного використання цифрових технологій, особливо, дітьми й молоддю. У 2019 році цей день припадає на 5 лютого.
Мільйони людей об’єднуються, щоб надихнутися для позитивних змін онлайн, підвищити освіченість з питань безпеки онлайн та взяти участь у заходах, що проходять у всьому світі.
День безпечного Інтернету націлений на створення безпечного та найкращого Інтернету, де кожний та кожна можуть використовувати технології відповідально, у дусі поваги, критично та творчо.