program draw_line; uses Crt, Math, Graph; var graphicsDriver, graphicsMode: Integer; x1, y1, x2, y2, dx, dy: real; u1, v1, u2, v2: real; p, q, a: real; b, d, c: real; f, k, w, z, h, e: Real; begin while (1 = 1) do begin k := 6.2831; clearDevice(); graphicsDriver := Detect; InitGraph(graphicsDriver, graphicsMode, ''); x1 := getMaxX div 2; y1 := getMaxY div 2; u1 := x1; v1 := y1; a := 0.5; c := 0; setColor(Yellow); p := 0.0001 * trunc(10000 * Random()); q := 0.0001 * trunc(10000 * Random()); b := 0...

Продолжим наш курс по знакомству с программированием. Сегодня продолжим знакомство с базовыми функциями в программировании и в частности с функциями Паскаля. Цель любой программы, это автоматизация в обработке входного потока данных, после этого - получение результата и его вывод или выдача нужного нам сигнала. Теперь вопрос, как образом могут поступать данные: 1. От любого устройства (мышь, клавиатура, джойстик) 2. Сетевой протокол с данными от датчика или другого устройства. 3. Данные из оперативной памяти, от другой программы или другого процесса 4...