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

Как нарисовать букву "И" в Free Pascal ! 

  1. Ответ
    Ответ дан AndreyAG2014
    Во free pascal?
    Если хоче порисовать то скачай Basic
    1. Ответ
      Ответ дан Аккаунт удален
      ну мне надо по координатам !!! Например вот буква Н uses crt;
      var i,j:byte;
      begin
      clrscr;
      for i:=1 to 7 do
      begin
      gotoXY(1,i);
      write('*');
      gotoXY(11,i);
      write('*');
      end;
      gotoXY(2,4);
      for i:=1 to 9 do
      write('*');
      readln
      end. а мне нужно И
Самые новые вопросы