Ответы
Ответ дал:
0
Во free pascal?
Если хоче порисовать то скачай Basic
Если хоче порисовать то скачай 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. а мне нужно И
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. а мне нужно И
Вас заинтересует
2 года назад
7 лет назад
10 лет назад
10 лет назад
10 лет назад