Các câu hỏi tương tự
Hãy. Nêu cú pháp và cách thực hiện của câu lệnh lặp for ..to..đó và while..đó trong ngôn ngữ pascal( mn chị em vs ạ mai em thì rùi 🥺 ai giúp em thì em cảm ơn ạ)
Viết trương trình nhập vào họ tên của các bạn trong lớp 8/4. xuất ra họ tên của các bạn vừa nhập. mn giúp em vs ạ
Mn giúp mình câu này vs ạ TT
LÀM TRÊN PASCAL NHA !!
GIÚP EM VS Ạ !!! MAI EM THI Ạ !!! EM CÁM ƠN Ạ !!
ai giúp em vs ạ t5 em phải thi rồi ;-;
Giúp em với mn chương trình Pascal ạ 
Mn giải giúp em câu 31 đc ko ạ
#_Ngộ ta_ huhu mọi người ơi sao hôm nay mình ko vô đc nick rồi, nó bảo là mật khẩu không đúng thì phải làm sao ạ? Giúp mik với 🤧. Mấy ngừi bạn dthw của tui ơi tui ko nhắn tin đc với mấy bạn nữa rùi😢 Nick mik là Học sinh chăm ngoan📝 , còn đây là nick em mik, mik mượn đỡ nick này để hỏi m.n. Ai bt cách nào thì chỉ giúp mik, mik cảm ơn nhìu🥰 ạ
Đọc tiếp
#_Ngộ ta_ huhu mọi người ơi sao hôm nay mình ko vô đc nick rồi, nó bảo là mật khẩu không đúng thì phải làm sao ạ? Giúp mik với 🤧. Mấy ngừi bạn dthw của tui ơi tui ko nhắn tin đc với mấy bạn nữa rùi😢
Nick mik là Học sinh chăm ngoan📝 , còn đây là nick em mik, mik mượn đỡ nick này để hỏi m.n. Ai bt cách nào thì chỉ giúp mik, mik cảm ơn nhìu🥰 ạ
Em cần gấp ạ mai thi rồi mà không biết ct của em sai ở đâu mn giúp em sửa lỗi với ạ Tìm và sửa lỗi trong chương trình pascal sau: var T, So, D: longint; begin T: 0; D: 0; repeat write(Nhap so: ); readln(So); if T + So 15000 then begin T: T + So; D: Dem + 1; end; until T 15000; write...
Đọc tiếp
Em cần gấp ạ mai thi rồi mà không biết ct của em sai ở đâu mn giúp em sửa lỗi với ạ
Tìm và sửa lỗi trong chương trình pascal sau:
var T, So, D: longint;
begin
T:= 0;
D:= 0;
repeat
write('Nhap so: ');
readln(So);
if T + So <= 15000 then
begin
T:= T + So;
D:= Dem + 1;
end;
until T >= 15000;
writeln('Tong cac so la: ', Tong);
writeln('Tong so da nhap: ', Dem);
readln;
end.