1. Антивирус
2. Интернет
3. Архивация
4. Клавиатура
5. Процессор
По вертикали :ВИРУС
1. Программа умножает своё значение на десять и затем прибавляет индекс цикла. В итоге делает это 4 раза.
Это равносильно сложению строковых данных в виде чисел от одного до четырёх.
s = '1' + '2' + '3' + '4' = 1234
Ответ: 1234.
2. Программа прибавляет к значению y значение индекса x (от 6 до 2) и затем делит значение на 5. [5 раз]
y = (0 + 6) / 5 = 1.2
y = (1.2 + 5) / 5 = 1.24
y = (1.24 + 4) / 5 = 0.848
y = (0.848 + 3) / 5 = 0.7696
y = (0.7696 + 2) / 5 = 0.55392
Ответ: 0.55392.
3. Программа прибавляет к значению s один и затем умножает значение на 2. [4 раза]
s = (0 + 1) * 2 = 2
s = (2 + 1) * 2 = 6
s = (6 + 1) * 2 = 14
s = (14 + 1) * 2 = 30
Ответ: 30.
1) Совокупление живых особей (передача днк и продолжение рода)
2) обезьяньи крики (общение)
3) Перенос информации на флеш-накопителе
4) Радиоволны
5) Ультразвук у летучих мышей
Var
x,prod1,prod2,ost:real;
begin
Write('Привезено картофеля, кг: ');
Read(x);
prod1:=x*1/4; { продано в первый день }
ost:=x-prod1; { остаток от продажи }
prod2:=ost*2/5; { продано во второй день }
ost:=x-(prod1+prod2);
Writeln('Оcталось продать, кг: ',ost)
end.
<u>Примеры</u>
Привезено картофеля, кг: 2540
Оcталось продать, кг: 1143
Привезено картофеля, кг: 743
Оcталось продать, кг: 334.35
var
i,n,s, k : integer;
begin
s:=0;
readln (n);
for i:= 1 to n do begin
readln (k);
if k mod 10 =0 then s:= s+k;
end;
writeln (s);
end.