Напишите для графического исполнителя алгоритм,который чертит вдоль границ поля пунктирную рамку(размеры поля произвольны).расстояние между пунктирами - 1 шаг,длина пунктира - 1 шаг.исходное положение исполнителя - произвольное.
188
356
Ответы на вопрос:
1. получить стартовые координаты 2. перейти на стартовые координаты 3. выбрать цвет кисти 4. входим в цикл обнуление всех счетчиков 4.1 проверяем количество повортов если оно равно 4 на выход иначе продолжаем 4.2 проверям не конец ли рамки если конец поврот на 90 градусов 4.3 чертим штрих 4.4 сдвигаемся на шаг 4.5 возвращаемся в пункт 4.1
Var a: array[1..15] of integer; i,c,n: integer; cr: real; begin for i: =1 to 15 do begin a[i]: =random(-20,10); if a[i] < 0 then begin c: =c+a[i]; n: =n+1; end; write(a[i]: 4); end; writeln; cr: = c/n; write('ответ: ',cr); end.
Популярно: Информатика
-
ALexus6713.07.2022 18:33
-
Asyu66627.06.2022 10:25
-
lGeneralll24.09.2020 10:28
-
albina18814.06.2022 10:56
-
Darishka2212.10.2020 20:06
-
ВикаЛук128.11.2020 04:47
-
dashutkazel122115.05.2021 13:45
-
саша428706.11.2020 12:43
-
vlada05119902.11.2022 01:26
-
Hictoru23.04.2020 20:06