var
a, b, x, s, p: integer;
begin
writeln(' Ввести х');
readln(x);
s := 0;
x := Abs(x); { защита от ввода отрицательных }
while x > 0 do
begin
s := s + x mod 10;
x := x div 10
end;
writeln(' Сумма цифр=', s);
end.
2)program 2;
var
k:integer;
<span>
tmp:real;</span><span>
b:string;</span><span>
c:string;</span><span>
i:integer;
</span>
begin
<span>
k:=0; i:=0; tmp:=0;</span><span><span>
write('</span>Введите k:');</span><span>
read(k);</span><span>
repeat</span><span>
tmp:=exp(i*ln(10));</span><span>
str(tmp:0:0, c);</span><span>
b:=b+c;</span><span>
i:=i+1;</span><span>
until length(b) >= k;</span><span>
c:=copy(b, k, 1);</span><span>
writeln(b);</span><span>
writeln('k-я цифра:', c);</span><span>
readln(k);</span>
<span>end.</span>
1.с
2.а
3.с
4.b
...
8.d
9.c
10.b
11.
1. Дискретность (алгоритм - последовательность простых шагов)
2. Определенность (каждый шаг алгоритма четкий и однозначный)
3. Результативность (алгоритм даёт результат за конечное число шагов)
4. Массовость (алгоритм подходит для некоторого класса задач, а не тольоко одной)
5. Правильность (алгоритм дает правильный результат решения поставленной задачи)
12.
Цикл с предусловием (см. рис.1) - цикл, в котором условие находится перед телом цикла, а сам цикл выполняется до тех пор, пока условие не станет ложным.
WHILE {условие продолжения цикла} DO
{действия}
Особенности:
1) число повторений цикла заранее неизвестно;
2) тело цикла может не выполниться ни разу;
Цикл с постусловием (см. рис.2) - условие цикла располагается после тела цикла, а не до него.
REPEAT
{действия}
UNTIL {условие выхода из цикла};
Особенности
1) число повторений цикла заранее неизвестно;
2) тело цикла выполняется как минимум один раз;
13.
(См. рис.3)
Сначала выполняются некоторые линейные шаги (блоки 2 и 3). С помощью блока 4 организован цикл с предусловием. Если условие 4 выполняется - выход из алгоритма (блок 9). Если условие 4 не выполняется - выполняется тело цикла (блоки 5, 6, 7, 8). В блоке 5 имеем разветвление алгоритма. Если условие 5 выполняется - переход к линейной последовательности шагов в блоках 6 и 7. Если условие 5 не выполняется - переход к действиям в блоке 8.
После выполнения блока 7 или 8 управление опять передаётся на блок 4 для проверки условия продолжения цикла.
1. Компьютерный вирус - это вредоносная программа, которая способна воспроизводить себя через компьютер или через компьютерные сети. Компьютер может заразиться вирусом через флешку, электронную почту или программы для обмена сообщениями.
2. Флешка, диск, интернет.
<span>
3. У</span><span>меньшение объема свободной оперативной памяти; замедление загрузки и работы компьютера; непонятные (без причин) изменения в файлах, а также изменения размеров и даты последней модификации файлов; ошибки при загрузке операционной системы; <span>непонятные системные сообщения, музыкальные и визуальные эффекты и т.д.
4. П</span></span><span>отеря программ, данных, стирание информации в системных файлах, выход из строя движущихся частей жесткого диска, уменьшение объёма памяти, зависание компьютера, и многое другое.
5. Не заходить на незнакомые сайты; регулярно проверять компьютер на наличие вирусов(использовать антивирус), не запускать незнакомые файлы.
6. Антивирус - это программа для обнаружения компьютерных вирусов. Виды антивирусов: сканеры, блокираторы, иммунизаторы.
</span>
1. Из маленьких и больших бусин 17 синих бусин 35 мелких бусин