1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
var current, past, sum: real;
i, n: integer;
begin
current : = 10;
for i : = 1 to 10 do begin
writeln(i, ' ', current);
past : = current;
current : = current * 1.1;
end;
current : = 10; sum : = 0;
write('n = ');
read(n);
for i : = 1 to n do begin
sum : = sum + current;
past : = current;
current : = current * 1.1;
end;
writeln('за ', n, ' дней: ', sum);
end.
Вирус —
Басқа программалар мен файлдарға өз көшірмесін автоматты түрде кірістіре отырып, файлдарды «бүлдіретін» компьютерлік шағын бағдарлама (1—2 Кб) немесе макрос. Зақымданған мәліметтерді жедел жадқа жүктеуде онда орналасқан басқа файлдарға өтіп, оларға да зақым келтіре алады. Вирустардың мәлімет түтастығын жоятын көптеген қауіпті қосымша әсерлері бар, олар — қатқыл дискінің қүрылымдық бөлімдерін (бөлімдердің түпкі кестесін бұзу арқылы) бүлдіреді, қатқыл дискіні қайта пішімдеп жібереді, файлдарды өшіріп тастайды немесе құрамын өзгертіп жібереді және т.б.;
Объяснение:Здравствуйте чего желаете мы с вами не здороваемся мы с вами разговариваем какой вопрос ты хочешь задать или поздороваться
.как то так