Сколько значащих нулей содержится в десятичной записи числа 100^20–10^15+10? объясните, .

Question

Информатика: Сколько значащих нулей содержится в десятичной записи числа 100^20–10^15+10? объясните, .

Kristin32 · Accepted Answer

program raf105;

uses

graphABC;

var

a: array[1..20,1..2] of integer;

x,y,i:integer;

begin

ClearWindow(clBlack);

randomize;

repeat

if i = 20 then

i:= 0;

i:=i+1;

x:=random(windowwidth);

y:=random(windowheight);

if a[i,1] = 0 then

begin

a[i,1]:= x;

a[i,2]:= y;

end

else

begin

setbrushcolor(clBlack);

circle(a[i,1],a[i,2],4);

a[i,1]:= x;

a[i,2]:= y;

end;

sleep(200);

setbrushcolor(clWhite);

circle(x,y,4);

until false;

end.

PascalABC 3.4.2