beginvar n := 0;while (not TryRead(n,'Введите количество чисел:')) or (n<0) do Writeln('неверный ввод');Writeln; if n=0 then Write('Чисел нет') else begin var a := ReadArrInteger('Введите числа:',n); Println('Сумма:',a.Sum); Println('Произведение:',a.Product); end end.
Задание 2:
uses GraphABC, ABCObjects; beginWindow.SetSize(300,200); var r1 := new RectangleABC(0,0,Window.Width,Window.Height div 2); var r2 := new RectangleABC(0,Window.Height div 2,Window.Width,Window.Height div 2); OnKeyPress += (c:char) -> begin r1.Text:=c; r2.Number:=Ord(c) end; end.
Если вы имели ввиду компакт диски то они делятся на;
Физические;
Химические;
Износ.
Повреждения жёсткого диска делятся на;
Выход из строя платы контролера;
Внешние повреждения;
Физиологические повреждения;
Выход из строя блока магнитной головки.
Начну с компакт дисков.
Физические повреждения- это как правило, царапины и сколы. Они не позволяют лучу добираться до нужной вам информационного слоя, преломляя его в неположенном месте.
Химические повреждения- образуются, когда компакт диск подвергается химическому воздействию, либо воздействию высокой температуры. В этом случае повреждается слой поликарбоната, что так же мешает считыванию информации. Деформированный диск может разорваться в читающем приводе (в том случае если вы сами засуните повреждённый диск в рабочий привод), что приведет к порче привода или всего оборудования.
Износ - не все вещи долговечны, так же как и компакт диски. Со временем информационный слой просто приходит в негодность, так как в процессе использования и хранения дорожки теряют нужную форму.
Что касается жёстких дисков.
Выход из строя платы контролера. В случае сбоя электропитания из строя может выйти из строя плата электроники, микросхемы управления двигателя и звуковой катушки. В этом случае для восстановления жёсткого диска нужно заменить плату контролера.
Физические повреждения-. Могут быть механические повреждения разъемов, корпуса, шпиндельного двигателя, магнитной головки на поверхности дисков, царапин на магнитном слое дисков.
Внешнее повреждение, достаточно легко поддаются ремонту.
Выход из строя блока магнитной головки. Причиной данной поломки является внешнее механическое воздействие, в основном это падение или удары, а так же перегрев или загрязнение магнитных головок.
Задание 1:
beginvar n := 0;while (not TryRead(n,'Введите количество чисел:')) or (n<0) do Writeln('неверный ввод');Writeln; if n=0 then Write('Чисел нет') else begin var a := ReadArrInteger('Введите числа:',n); Println('Сумма:',a.Sum); Println('Произведение:',a.Product); end end.Задание 2:
uses GraphABC, ABCObjects; beginWindow.SetSize(300,200); var r1 := new RectangleABC(0,0,Window.Width,Window.Height div 2); var r2 := new RectangleABC(0,Window.Height div 2,Window.Width,Window.Height div 2); OnKeyPress += (c:char) -> begin r1.Text:=c; r2.Number:=Ord(c) end; end.Задание 3:
beginWriteln(' I: X:');SeqGen(10,x->Random(0,20)*5).Numerate.PrintLines(x->Format('{0,2} {1}',x[0],x[1])) end.Примеры работ:
Если вы имели ввиду компакт диски то они делятся на;
Физические;
Химические;
Износ.
Повреждения жёсткого диска делятся на;
Выход из строя платы контролера;
Внешние повреждения;
Физиологические повреждения;
Выход из строя блока магнитной головки.
Начну с компакт дисков.
Физические повреждения- это как правило, царапины и сколы. Они не позволяют лучу добираться до нужной вам информационного слоя, преломляя его в неположенном месте.
Химические повреждения- образуются, когда компакт диск подвергается химическому воздействию, либо воздействию высокой температуры. В этом случае повреждается слой поликарбоната, что так же мешает считыванию информации. Деформированный диск может разорваться в читающем приводе (в том случае если вы сами засуните повреждённый диск в рабочий привод), что приведет к порче привода или всего оборудования.
Износ - не все вещи долговечны, так же как и компакт диски. Со временем информационный слой просто приходит в негодность, так как в процессе использования и хранения дорожки теряют нужную форму.
Что касается жёстких дисков.
Выход из строя платы контролера. В случае сбоя электропитания из строя может выйти из строя плата электроники, микросхемы управления двигателя и звуковой катушки. В этом случае для восстановления жёсткого диска нужно заменить плату контролера.
Физические повреждения-. Могут быть механические повреждения разъемов, корпуса, шпиндельного двигателя, магнитной головки на поверхности дисков, царапин на магнитном слое дисков.
Внешнее повреждение, достаточно легко поддаются ремонту.
Выход из строя блока магнитной головки. Причиной данной поломки является внешнее механическое воздействие, в основном это падение или удары, а так же перегрев или загрязнение магнитных головок.