Население Москвы равняется а=9000000 жителей.
Население Нью-Васюков равняется b=1000 жителей. Напишите программу,
которая определяет разницу в числе жителей между двумя городами.
Используйте переменные величины.

c:=b-a;

Объяснение:

var a,b,c : integer;

begin

a:=9000000;

b:=1000;

c:=b-a;

writeln (c, ' Всего Людей');

readln;

end.

Var

NasMoskva, NasNewVas, raznica : integer;

Begin

NasMoskva := 9000000 ; NasNewVas := 1000;

raznica := NasMoskva - NasNewVas ;

Write('Raznica=', raznica) ;

Readln;

End.

Объяснение:

Я смог

program p_1; var i, n : integer; a, s : real; b : array [1..1000] of real; begin writeln('введите число а'); readln(a); writeln('введите количество значений массива n'); readln(n); write('введите элементы массива b'); for i: =1 to n do readln(b[i]); writeln('первоначальный массив b'); for i: =1 to n do writeln(b[i]); s: =0; for i: =1 to n do if b[i] > a then s: =s+b[i]; writeln('сумма значений =', s); end.

я думаю что основанием будет число 7 

проверка: 7^2*1+7^1*2+7^0*2= 49+14+2=65