1.даны 10 чисел, вывести те из них, которые являются полными квадратами. составить блок-схему и программу. 2.даны 10 чисел, найти их произведение. составить блок-схему и программу. 3.даны 10 чисел, найти сумму четных. составить блок-схему и программу.

ОС Windows более распространена, потому что небольшая компания Майкрософт вовремя и удачно предложила свою новую операционную систему DOS гиганту IBM, который всё же решил снизойти до рынка Персональных Компьютеров и создал в итоге целую архитектуру IBM PC, открытую и общедоступную. Т.е. компьютеры по таким стандартам, периферию и ПО к ним могла делать любая фирма, а не только IBM. В то время это было необычно. "IBM PC совместимых" компьютеров стало ооочень много в мире и практически на всех стояла MS-DOS, а затем и Windows.

Может быть, так:
uses graphABC;
Begin
setfontcolor(clRed);
writeln('Белеет парус одинокой');
setfontcolor(clBlue);
writeln('В тумане моря голубом!..');
setfontcolor(clDarkOrchid);
writeln('Что ищет он в стране далекой?');
setfontcolor(clDeepSkyBlue);
writeln('Что кинул он в краю родном?..');
setfontcolor(clDeepPink);
writeln('Играют волны - ветер свищет,');
setfontcolor(clMagenta);
writeln('И мачта гнётся и скрыпит...');
setfontcolor(clDarkGreen);
writeln('Увы! он счастия не ищет');
setfontcolor(clLime);
writeln('И не от счастия бежит!');
setfontcolor(clBrown);
writeln('Под ним струя светлей лазури,');
setfontcolor(clIndigo);
writeln('Над ним луч солнца золотой...')
End.