Question

информатика. массивы

Answer 1

program gt;
var a:array[0..100]of integer;
s,i,n:integer;
begin
s:=0;
n:=12;
for i:=0 to n do
read(a[i]);
for i:=0 to n do
begin
if(a[n-i]-a[i]=a[i])then s:=s+2*a[i];
end;
writeln(S);
end.
ответ 80
2)
такая же программа но там умножаем на 3
и числа другие
ответ 24

Answer 2

вопросы..

Answer 3

сейчас скину кое что

Answer 4

ну я новое задание сделала

Answer 5

там к ниму пример маленький прилагается ).я знаю ,что там как-то выщитывать надо