Program n1;
const n=10;
var a: array[1..n] of integer;
i,sum: integer;
begin
sum:=0;
for i:=1 to n do
begin
readln(a[i]);
if i mod 2=0 then sum:=sum+a[i];
end;
writeln(sum);
end.
1 A2 B4 C6 D8
2 =B1/A1 =C1-B1 =D1/A1......КАКАЯ ИЗ ФОРМУЛ ПРИВЕДЁННАЯ И Т.Е 1)C1/A1+1
2)=A1-1
3)C1+B1
4)C1+1
1.35
2.var y,x:real;
begin
read(x);
if x<=-1 then
y:=-(1/sqr(x))
else if (x>-1) and (x<=-2) then
y:=sqr(x)
else if x>2 then y:=-4;
print (y);
end.
Cхему думаю составишь сам уже
Int num;
for(int i = 0; i < k; i++) if(arr[i] == int(arr[i]) num++;
num - количество целых чисел
k - количество интераций