Viết chương trình tính giá trị của biểu thức y =a/b (a,b nguyên)
2 câu trả lời
Program tinhgiatri;
uses crt;
var a,b : integer;
y : real;
begin clrscr;
write('Nhap so a='); readln(a);
write('Nhap so b='); readln(b);
y:=a/b;
Write('Gia tri cua bieu thuc : y=', y);
readln
end.
program oken;
uses crt;
var a,b: longint;
y: real;
begin
clrscr;
write('Nhap gia tri a: '); readln(a);
write('Nhap gia tri b: '); readln(b);
y:=a/b;
writeln('Gia tri cua bieu thuc y=a/b: ',y:0:3);
readln;
end.
Câu hỏi trong lớp
Xem thêm
