profile
Опубликовано 6 лет назад по предмету Информатика от Pole4ka3122

Нужно написать задание в поскале. Елочка на 3 триугольника, линиями, в цвете. 

  1. Ответ
    Ответ дан sinerDt

    program p;
    uses crt,graph;
    var
    D,M:INTeGeR;
    begin
    clrscr;
    initgraph(d,m,'');
    setcolor(green) ;
    line(200,420,300,420);
    line(300,420,250,330);
    line(250,330,200,420);
    line(200,330,300,330);
    line(300,330,250,240);
    line(250,240,200,330);
    line(200,240,300,240);
    line(300,240,250,140);
    line(250,140,200,240);

    readkey;
    end.

Самые новые вопросы