Написать программу, которая запрашивает массив из n целых чисел, а затем складывает все элементы с нечетными номерами и все элементы с четными номерами и выводит их сумму, а также сам исходный массив. !

Program al;
const n=10;
var a:array[1..n] of integer;
s,s1,s2,i:integer;
begin
writeln('vvedite danniy massiv=');
for i := 1 to n do
readln(a[i]);
s:=0;
s1:=0;
s2:=0;
for i := 1 to n do 
if i mod 2=0 then s1:= s1+a[i] else
begin 
s2:=s2+a[i];
s:=s1+s2;
end;
writeln('ishodniy massiv=');
for i := 1 to n do
write (a[i]:4);
writeln(' summa=',s);
readln;
end.

Задание 2, 3 во вложении

Объяснение:

Задание 1.

Сначала вводятся переменные b и с через пробел.

Мы вводим сначала с, оно равно 205, и затем b, оно равно 204.

затем идет условие.

Если с>b или b mod 2=0

Если 205>204 или

b mod 2=0 - это означает, число b кратно 2, то есть при делении на 2 оно должно дать 0.

В нашем случае 204/2=102 , то есть число 204 кратно 2, оно поделилось на него без остатка.

Первое и второе условие сработало, а значит выполняется следующее:

a:=b+2;

То есть в переменной а мы к b прибавляем 2. И у нас выходит:

a:=204+2=206

Условие иначе у нас не работает, поэтому выводим:

Writeln(a);

Программа выведет число а

206.

Объяснение:

К сожалению, в процессе революции в науке, происходившей с понятиями времени, энергии, импульса и массы, Эйнштейн, кроме прочего, оставил после себя два различных и противоречащих друг другу определения массы. Из-за этого всё, что мы говорим и имеем в виду, можно интерпретировать двумя очень разными При этом непосредственно в физике никакой путаницы нет. Специалисты точно знают, о чём идёт речь, и знают, как делать предсказания и использовать подходящие уравнения. Весь во только в значении самого слова. Но слова важны, особенно когда мы беседуем о физике с людьми, не являющимися экспертами в этой области, и с учениками, для которых уравнения пока ещё не полностью понятны.