Giúp mình với mọi người Câu hỏi B1 5<=10,x<--0,5 B2 nếu 5<5.2 chuyển sang b4 B3 5<--5-x,quay lại bước 2 B4 thông báo 5,và kết thúc Viết chương trình pascal thể hiện thực toán Giúp mình với
2 câu trả lời
program thuattoan;
uses crt;
var x,n:integer;
begin clrscr;
n:=10; x:=0,5;
while n<5.2 do n:=5-x;
readln;
end.
Học tốt!
Mình thay số $5$ được gán đó bằng biến nha .-. Chứ gán số không làm được
Program Hotboy ;
Uses crt;
Var i,x : integer ;
Begin
Clrscr ;
i:=10; x:=0.5;
While i> 5.2 do
Begin
I:=i-x ;
End;
Writeln(i);
Readln
End.
- Đề thi học kì 2 môn địa 8 có lời giải chi tiết
- Đề thi học kì 2 môn địa 8 có lời giải chi tiết
- Đề thi học kì 2 môn địa 8 có lời giải chi tiết giúp các em luyện tập và củng cố kiến thức hiệu quả
- Kiểm tra 15 phút lần 1 học kì 1 - đề số 5 Địa 8 có lời giải chi tiết
- Kiểm tra 15 phút lần 1 học kì 1 - đề số 4 Địa 8 có lời giải chi tiết
