Viết hàm tính giá trị F(a) = a^4 Viết thân chương trình nhập vào 2 số nguyên x ,y tính và suất ra màn hình giá trị T = F(x) + F(y)
Viết hàm tính giá trị F(a) = a^4 Viết thân chương trình nhập vào 2 số nguyên x ,y tính và suất ra màn hình giá trị T = F(x) + F(y)
program tinh_T;
uses crt;
var x,y,t:longint;
{—Ham—}
function F(a:longint):longint;
begin
F:=a*a*a*a;
end;
{—Chuong-trinh-chinh—}
BEGIN
clrscr;
write(‘Nhap x: ‘); readln(x);
write(‘Nhap y: ‘); readln(y);
T:=F(x)+F(y);
write(‘T= ‘,t);
readln;
end.
program tinh_T;
uses crt;
var x,y,t:longint;
{—Ham—}
function F(a:longint):longint;
begin
F:=a*a*a*a;
end;
{—Chuong-trinh-chinh—}
BEGIN
clrscr;
write(‘Nhap x: ‘); readln(x);
write(‘Nhap y: ‘); readln(y);
T:=F(x)+F(y);
write(‘T= ‘,t);
readln;
end.
chúc bn học tốt