Перечисли этапы решение задачи с компьютера.
Выбери правильные ответы из предложенных вариантов.
а) Пpогpаммиpование
b) Редактирование
c) Тестиpование и отладка
d) Разработка алгоритма (создание алгоритма)
e) Постановка проблемы
f) Формализация задачи
Var p:real;
Begin
p:=(a+b+c)/2;
result:=Sqrt(p*(p-a)*(p-b)*(p-c))
End;
Function Tr(a,b,c:real):boolean;
Begin
result:=(a+b>c)and(a+c>b)and(b+c>a)
End;
Var
a,b,c,k1,k2,h,t,s,r1,r2:real;
Begin
writeln(' найти радиус или площадь треугольника? если радиус,то нажмите 1. Если площадь, то нажмите 2 ');
readln(k1);
if k1=1 then
begin
writeln('окружность вписанная(нажмите 1) или описанная(нажмите 2)?');
readln(k2);
write('сторона а = ');
readln(a);
write('сторона b = ');
readln(b);
write('сторона с = ');
readln(c);
if Tr(a,b,c) then
begin
s:=Sq(a,b,c);
if k2=1 then
begin
r1:=(a+b+c)/(2*s);
writeln('радиус вписанной окружности = ' , r1);
end;
if k2=2 then
begin
r2:=a*b*c/(4*s);
writeln('радиус описанной окружности = ', r2);
end;
end else WriteLn('Треугольник не существует');
end
else
if k1=2 then
begin
writeln('что вам известно? если а и h, то нажмите 1. если а,b,с то нажмите 2' );
readln(k2);
if k2=1 then
begin
write('высота = ');
readln(h);
write('cторона = ');
readln(t);
s:=1/2*h*t;
writeln('площадь = ',s);
end;
if k2=2 then
begin
Write('a = ');
ReadLn(a);
Write('b = ');
ReadLn(b);
Write('c = ');
ReadLn(c);
if Tr(a,b,c) then
begin
s:=Sq(a,b,c);
writeln('площадь = ',s) ;
end else WriteLn('Треугольник не существует');
end;
end;
end.
Пример:
найти радиус или площадь треугольника? если радиус,то нажмите 1. Если площадь, то нажмите 2
2
что вам известно? если а и h, то нажмите 1. если а,b,с то нажмите 2
1
высота = 3
cторона = 4
площадь = 6
Дефрагментация дисков — последовательная физическая перезапись данных на диске таким образом, чтобы файлы были записаны целиком и полностью в соседних секторах и шли последовательно друг за другом. В этом случае головке жесткого диска придется совершить минимум движений для их считывания и скорость этой операции будет максимально.
Щёлкните Мой компьютер –> выделите нужный диск; – щелчком правой кнопки мыши вызовите контекстное меню –> Свойства; – в открывшемся диалоговом окне Свойства откройте вкладку Сервис; – в разделе Дефрагментация диска щёлкните кнопку Выполнить дефрагментацию…; – в открывшемся окне Дефрагментация диска нажмите кнопку Дефрагментация; – дождитесь окончания процесса дефрагментации.
Можно запустить дефрагментацию другим Пуск –> Настройка –> Панель управления –> Администрирование –> Управление компьютером –> Дефрагментация диска –> выделите нужный диск –> Дефрагментация.
Объяснение:
Дефрагментация – процесс объединения нескольких разрозненных фрагментов (частей) одного файла в один большой для повышения скорости считывания данных с жесткого диска компьютера.
В процессе записи файлов на магнитные носители (HDD) они могут быть разделены на несколько фрагментов и размещены в разных частях диска. Делается это потому, что свободное место на диске неравномерно. Система записывает файл в свободные сектора на жестком диске. И если в процессе такой записи обнаруживается, что следующий сектор занят данными, то файл разделяется и запись производится в следующие свободные сектора, которые следуют за занятыми. Так файл разделяется на несколько частей, а для его считывания головке жесткого диска требуется больше времени и энергии, так как нужно совершить «холостые» движения, чтобы проскочить сектора, занятые другими файлами.
Ничего страшного, если фрагменты расположены физически рядом друг с другом. Но вот если они разнесены по разным частям диска, то для считывания необходимо совершить больше действий и потратить больше энергии. Соответственно, и скорость считывания будет ниже.