Viết chương trình con tính tích hai số nguyên a và b Mọi người giúp mình với mình đang cần lời giải gấp. 10/08/2021 Bởi Harper Viết chương trình con tính tích hai số nguyên a và b Mọi người giúp mình với mình đang cần lời giải gấp.
program bt1; var a,b,c:integer; begin write(‘nhập số a là : ‘);readln(a); write(‘nhập số b là : ‘);readln(b); c:=a*b; write(‘a*b=’,c); readln; end. Bình luận
uses crt;var a,b:integer;{—Ham-tich—}function p(a,b:integer):integer; begin p:=a*b; end;{—Chuong-trinh-chinh—}begin clrscr; write(‘Nhap a,b: ‘); readln(a,b); write(‘Tich: ‘,p(a,b)); readln;end. Bình luận
program bt1;
var a,b,c:integer;
begin
write(‘nhập số a là : ‘);readln(a);
write(‘nhập số b là : ‘);readln(b);
c:=a*b;
write(‘a*b=’,c);
readln;
end.
uses crt;
var a,b:integer;
{—Ham-tich—}
function p(a,b:integer):integer;
begin
p:=a*b;
end;
{—Chuong-trinh-chinh—}
begin
clrscr;
write(‘Nhap a,b: ‘); readln(a,b);
write(‘Tich: ‘,p(a,b));
readln;
end.