Viết chương trình pascal nhập vào số nguyên a. In ra màn hình giá trị a^3 Giúp mình với

0 bình luận về “Viết chương trình pascal nhập vào số nguyên a. In ra màn hình giá trị a^3 Giúp mình với”

1. Program BTT;
   Uses crt;
   Var a,s: int64;
   Begin
           Clrscr;
           Write(‘Nhap a: ‘); Readln(a);
           s:=sqr(a)*a;
           Write(a,’^3 = ‘,s);
           Readln
   End.

   Bình luận

2. uses crt;
   var a,m,i:longint;
   begin
   clrscr;
      write(‘a=’); readln(a); m:=a;
      For i:=1 to 2 do a:=a*m;
      Writeln(a);
   readln
   end.

   Bình luận