VCT nhập vào vận tốc và quãng đường===>tính thời gian sử dụng while
1 câu trả lời
uses crt;
var v, t, s, A: integer;
begin
clrscr;
write ('nhap van toc: '); readln (v);
write ('nhap quang duong: '); readln (s);
t:=0;
while t<s/v do
begin
t:=t+1;
end;
write ('thoi gian la: ',t);
readln;
end.
Câu hỏi trong lớp
Xem thêm
