VCT tính:S1=(a+b)^3/a^2 và S=(a+b)^3/a^2.In S lấy 3 số thập phân và S1 lấy phần nguyên chạy chương trình chữ ngôn ngữ pascal mình mới học có 4 kiểu dữ liệu:real,string,integer,char
2 câu trả lời
Program baitap;
Uses crt;
Var a,b:real;
Begin
Clrscr;
Write('a='); Readln(a);
Write('b='); Readln(b);
Writeln('S1=',((a + b)*(a + b)*(a + b))/(a*a):6:0);
Writeln('S=',((a + b)*(a + b)*(a + b))/(a*a):6:3);
Readln
End.
uses crt;
var a, b, s1, s : real;
begin
clrscr;
write('nhap hai so a va b : '); readln(a, b);
s1 := (sqr(a + b) * (a + b)) / sqr(a);
s := (sqr(a + b) * (a + b)) / sqr(a);
writeln('S = ', s:2:3);
writeln('S1 = ', s:2:0);
readln
end.