1) у меня программа начинается с такого положения и изменить его я не могу
2) так программа выглядит после после окончания работы
КОНЕЦ ПРОЦЕДУРЫ
ПРОЦЕДУРА п3
ПОВОРОТ
ПОВОРОТ
ПОВОРОТ
КОНЕЦ ПРОЦЕДУРЫ
Это конец программы - по другому его просто не видно.
п3 - служит для поворота из первоначального положения вниз
с6 - рисует сторону в 6 шагов и делает поворот
с5 - рисует сторону в 5 шагов и делает поворот
и т.д.
Кнопка ОПИСАНИЕ - пишешь имя процедуры.
Внизу появляется:
ПРОЦЕДУРА имя процедуры
КОНЕЦ ПРОЦЕДУРЫ
Пишешь какие действия должна выполнять процедура
В программу вставляешь кнопкой ВЫЗОВ (выбираешь имя процедуры) и в программе появляется
ДЕЛАЙ имя процедуры
Спасибо
Ответ дал: Гость
Var m: array[1..15] of real; i: integer; n: real; begin randomize; for i: =1 to 15 do begin m : =random(20)-20; if( m< 0) then begin m: =sqr(m); end;
Ответ дал: Гость
мы заметили закономерность- с каждым днем кол-во ряски увеличивается в 2 раза.30 июня ряска покрыла всю поверхность озера ===> половина озера была покрыта ряской 29 июня.
Популярные вопросы