Если масив заполнить нужно рандомно:
program wk;
var i,s:integer;mas:array [1..10] of integer;
begin
s:=0;
for i:=1 to 10 do
begin
mas[i]:=random(21)-20;
if mas[i] mod 2=0 then s:=s+mas[i];
end;
writeln('S=',s)
end.
Если масив заполняется с клавиатуры:
program wk;
var i,s:integer;mas:array [1..10] of integer;
begin
s:=0;
for i:=1 to 10 do
begin
readln(mas[i]);
if (mas[i] mod 2)=0 then s:=s+mas[i];
end;
writeln('S=',s)
end.
подставим число три в формулу N=2^i, N=2^3, N=8
ответ - у фигуры 8 граней
Объяснение:
42,95,75,54
*мне не хватает необходимых символов, чтобы отправить ответ, поэтому я написал это
1)252750,5
2)2775250,5
3)275253
4)2527525,5
5)2777525,5
#include <iostream>
#include <cmath>
using namespace std;
int main()
{
int a, b;
cin >> a >> b;
for (int i=a; i<=b; i++) {
cout << i << "*" << i << " = " << pow(i, 2) << endl;
}
return 0;
}