làm nhanh tui nhờ

[boy_100]

[TẶNG BẠN] TRỌN BỘ Bí kíp học tốt 08 môn
Chắc suất Đại học top - Giữ chỗ ngay!!

ĐĂNG BÀI NGAY để cùng trao đổi với các thành viên siêu nhiệt tình & dễ thương trên diễn đàn.

cho thuật toán sau
hãy viết cho tui một chương trình pascal với sử dụng câu lệnh lặp while.......do
-thuật toán nè
bước 1 :S<--10,x<--0,5
bước 2: Nếu S<=5.2,chuyển tới bước 4
bước 3 :S <--S -x và quay lại bước 2
bước 4 :thông báo S và kết thúc thuật toán

chú ý :bước 2 là S bé hơn hoặc bằng 5.2
làm nhanh dùm tui cần gấp lắm !

 

[kool_boy_98]

trả lời: chương trình pascal tương ứng thuật toán trên là(bỏ qua những phần không quan trọng như PROGRAM, USES,...., nếu bạn thích thì thêm vào)
var S, x: real;
begin S:= 10; x:=0.5;
while S > 5.2 do S := S - x;
writeln('Gia tri cua S la :', S);
readln;
end.
---------------------------------------
chúc bạn học tốt nha! néu bài trên có sai xót thì bỏ qua cho nha!