1.var a:array [1..10] of integer; i,s:integer;
begin
for i:=1 to 10 do
begin
a[i]:=random(-10,10);
if a[i]>0 then s:=a[i]+s;
end;
writeln(s);
end.
2.var a:array [1..10] of integer; i,s:integer;
begin
for i:=1 to 10 do
begin
a[i]:=random(10);
if a[i] mod 2 = 0 then s:=s+a[i];
end;
write(s);
end.
3.var a:array [1..10] of integer; i,s:integer;
begin
for i:=1 to 10 do
begin
a[i]:=random(101);
if (i mod 2 = 0) and (a[i] mod 2 = 0) then s:=s+a[i];
end;
writeln(s);
end.
Var
k,x:integer;
Begin
readln(x);
k:=2*x;
writeln('2*x = ',k);
k:=3-(5*x);
writeln('3-(5*x)= ',k);
k:=2+x-6;
writeln('2+x-6=',k);
<span>End.</span>
Монитор является предметом для вывода информации что бы человек мог её видеть , а процессор для задачи этой информации. Процессор главная составляющая компьютера
Кодирование информации - это процесс шифрования информации. Информацию кодируют для того , чтобы в дальнейшем с нею было удобнее работать , то есть сохранять , передавать и.т.д Информацию шифруют знаками , знаки-это элементы , с помощью которых можно кодировать информацию)
Б.командный. т.к такого вида не бывает