Предмет: Информатика, автор: Аноним

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

Ответы

Автор ответа: AndreyAG2014
0
Во free pascal?
Если хоче порисовать то скачай Basic
Автор ответа: Аноним
0
ну мне надо по координатам !!! Например вот буква Н 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. а мне нужно И
Похожие вопросы
Предмет: Математика, автор: evelina38462
Предмет: Литература, автор: Аноним