Pascal ABC.NET кубики
Я где-то слышал что в паскале АВС. NET можно хранить картинку (будем её рисовать знаками в консоли) и пока она полностью не будет готова, то её не выведет на экран (Это избавит нас от мигания экрана) . Как можно осуществить это в Примере:
uses CRT;
var g:byte;
begin
repeat;
sleep(50);
ClrScr;
for g:=1 to 5 do begin
writeln(#9608,#9608,#9608,#9608,#9608);
writeln(#9608,' ',#9608);
writeln(#9608,' ',#9608);
writeln(#9608,#9608,#9608,#9608,#9608);
end;
until g=6;
end.
Если это невозможно, то так и напишите.