Вопрос по информатике:
Помогите составить рисункок звезды и нарисовать его в системе Pascal ABC
- 07.01.2018 10:09
- Информатика
- remove_red_eye 13883
- thumb_up 45
Ответы и объяснения 1
uses abcObjects,graphabc;
var s:starabc;
begin s:=new StarABC(Window.Width div 2,Window.Height div 2,60,120,5,clYellow);
for var i:=5 to 40 do
begin
Sleep(50);
S.Count:=I;
end;
for var i:=40 downto 5 do
begin
Sleep(50);
S.Count:=I; end; for var i:=1 to 360 do
S.Angle:=I;
for var i:=360 downto 1 do
S.Angle:=I;
end.
- 09.01.2018 00:11
- thumb_up 14
Знаете ответ? Поделитесь им!
Есть сомнения?
Не нашли подходящего ответа на вопрос или ответ отсутствует? Воспользуйтесь поиском по сайту, чтобы найти все ответы на похожие вопросы в разделе Информатика.
Трудности с домашними заданиями? Не стесняйтесь попросить о помощи - смело задавайте вопросы!
Информатика — наука о методах и процессах сбора, хранения, обработки, передачи, анализа и оценки информации с применением компьютерных технологий, обеспечивающих возможность её использования для принятия решений.