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
2 câu trả lời
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.
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.