Ответ:
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
program Project1;
const n=10;
var i,sum:integer;
A:array [1..n] of integer;
begin
for i:=1 to n do begin
write('введите A[',i,']'); readln (A[i]);
end;
writeln;
sum:=0;
for i:=1 to n do
if A[i]<0 then begin
writeln ('A[',i,']'); sum:=sum+A[i];
end;
writeln ('Сумма отрицательных элементов =',sum);
end.
Объяснение:
Лови фото на фото второй пример перевода из двоичной в десятичную, из четверичной принцип тот же
1)3
2)3
3)4
4)4
5)3
6)б,с,д,а
7)3270
вторую страницу не осилила)))
Электронная почтовая, это как средство приложения к письмам