Var
NasMoskva, NasNewVas, raznica : integer;
Begin
NasMoskva := 9000000 ; NasNewVas := 1000;
raznica := NasMoskva - NasNewVas ;
Write('Raznica=', raznica) ;
Readln;
End.
Объяснение:
Я смог
Поделитесь своими знаниями, ответьте на вопрос:
Население Москвы равняется а=9000000 жителей. Население Нью-Васюков равняется b=1000 жителей. Напишите программу, которая определяет разницу в числе жителей между двумя городами. Используйте переменные величины.
c:=b-a;
Объяснение:
var a,b,c : integer;
begin
a:=9000000;
b:=1000;
c:=b-a;
writeln (c, ' Всего Людей');
readln;
end.