1. B:\*.*
2. G:\today.*
3. D:\?????.djvu
4. A:\f??.*
Uses Crt,GraphABC;var i,n,q,c:integer;beginhidecursor;Writeln('Введите количество досок N:');Read(n);clearwindow;For I:=1 to n dobeginc:= clyellow;SetPenColor(c);SetPenWidth(2);q:=40*i;MoveTo(100+q,340);LineTo(100+q,130);LineTo(120+q,100);LineTo(140+q,130);LineTo(140+q,340);LineTo(100+q,340);floodfill(100+q+10,200,c);<span>end;</span>
Var k,sum:integer;
begin
sum:=0;
for k:=50 to 100 do
if((k mod 2 = 0) and (k mod 3 =0)) then sum:=sum+k;
writeln(sum);
end.
1) Обмен данными между ПК, и т.п.
Обеспечение системы
Загрузка программ в память
Организация диалога
2) Windows, Linux, Mac OS.
3)Обмен информацией командами или инструкциями между человеком и ЭВМ
4)В процессе практической работы на компьютере у пользователя периодически возникают проблемы, связанные как с работой системы в целом, так и отдельных устройств и программ: замедление работы, нехватка места на диске, ошибки выполнения программ, их зависание и т.п. Для выявления таких проблем, устранения причин их возникновения и обслуживания отдельных устройств в состав системного программного обеспечения включают сервисные программы (утилиты).
(Твой Одноклассник)