|
Вернуться
| 1 Биушкин Дмитрий Олегович, 27 декабря 2011 г. 17:10:27 | |
uses graphabc,crt;
var
i:integer;
begin
for i:=1 to 10 do line(i+100,100,100,i-100);
end.
|
|
|
| 2 Биушкин Дмитрий Олегович, 27 декабря 2011 г. 17:10:16 | |
uses graphabc,crt;
var
a,i:integer;
begin
for i:=1 to 10 do line(i+100,100,100,i-100);
end.
|
|
|
Чтобы оставить сообщение необходимо зарегистрироваться и авторизоваться!
| |
