Odpowiedzi

2010-01-14T12:47:16+01:00
Uses CRT;
var a:integer;
for a:=1 to 10 do
begin
gotoxy(10,10);
Textcolor('Red');
Writeln(*);
DeLay(1000);
gotoxy(10,10);
Textcolor('Cyan');
Writeln(*);
end;


wydaje mi sie ze tak to powinno byc