Category

Similar Problems

0438. TDT8

Time limit : 1000 ms
Memory limit : 64 mb

Pascal tilida  power operatori necha marta uchragan;

Kiruvchi ma’lumot: Sizga dastur kodini beradi;

Chiquvchi ma’lumot: necha marta uchrashini chiqaring;

Kiruvchi ma’lumot

Chiquvchi ma’lumot

var

a:integer;

procedure chiqar(a:integer)

begin

      write(a);

end;

begin

    read(a);

    chiqar(a);

    end.

0

var

a:integer;

begin

    read(a);

    write(power(a,3));

end;

 

1