1. почистить изнутри 2. если есть непригодные детали заменить 3. по надобности можешь повысить оперативы, но нужно, чтобы планки памяти были одинаковые! 4 по надобности можешь добавить ssd памяти, поставив новый диск, но он должен быть такой же как и старый. если вирус снеси винду и через флэшку и биос поставь новую, предварительно кинуть на другую флэшку нужную информацию.
p.s по моим подщетам на почистить детали-530руб. оператива kingston 8гб 2 штуки 290$ ssd память терабайт-299$, флэшка или диск с виндоус 10 pro version с полной поддержкой-125$ итого: 43370руб. это примерная цена, я заходил месяц назад на магазин и это без доп деталей! в $: 722,83$
#include <iostream>
#include <vector>
using namespace std;
bool isLeap(int y){
return (y % 400 == 0 || (y % 4 == 0 && y % 100 != 0));
}
signed main(){
string s, cur;
cin >> s;
vector<int> d;
for(int i = 0; i < s.length(); i++){
if(s[i] == '.'){
d.push_back(stoi(cur));
cur.clear();
}
else
cur += s[i];
}
d.push_back(stoi(cur));
int k = d[0];
d[1]--;
while(d[1] > 0){
if(d[1] == 2) k += 28 + isLeap(d[2]);
else if((d[1] < 8 && d[1] % 2 == 1) || (d[1] >= 8 && d[1] % 2 == 0)) k += 31;
else k += 30;
d[1]--;
}
cout << (365 + isLeap(d[2])) - k + 1;
}
var ma:ta;
i,k,j:integer;
procedure SearchAndInc(ma:ta; var k:integer);
var i,j:integer;
begin;
for i:=1 to 30 do
for j:=1 to 10 do
if (i+j) mod 5=0 then k:=k+ma[i,j];
end;
begin;
randomize;
writeln('Matrix:');
for i:=1 to 30 do
begin;
writeln;
for j:=1 to 10 do
begin;
ma[i,j]:=random(50);
write(ma[i,j]:4);
end;
end;
SearchAndInc(ma,k);
writeln;
writeln('Result:',k);
end.
2)type
ta=array[1..20,1..5] of Integer;
procedure Minim(ma:ta;var mini,minj:integer);
var i,j,min:integer;
begin;
min:=2147483647;
for i:=1 to 20 do
begin;
for j:=1 to 5 do
begin;
if min>ma[i,j] then
begin;
min:=ma[i,j];
mini:=i;
minj:=j;
end;
end;
end;
end;
var ma:ta;
i,j,c,mini,minj,min:integer;
begin;
randomize;
writeln('Matrix:');
for i:=1 to 20 do
begin;
writeln;
for j:=1 to 5 do
begin;
ma[i,j]:=random(50);
write(ma[i,j]:4);
end;
end;
Minim(ma,mini,minj);
writeln;
c:=ma[1,2];
ma[1,2]:=ma[mini,minj];
ma[mini,minj]:=c;
writeln('Final matrix:');
for i:=1 to 20 do
begin;
writeln;
for j:=1 to 5 do
write(ma[i,j]:4);
end;
writeln;
writeln('Min:',min);
end.