Các câu hỏi tương tự
Giúp em với mn chương trình Pascal ạ 
Mọi người giúp em với ạ mai em kiểm tra cuối kì em cảm ơn trước ạ: Viết chương trình pascal tính tổng của n số nguyên với n được nhập từ bàn phím mong mọi người giải giùm
viết chương trình Pascal:
-tính chu vi và diện tích hình tròn.
-kiểm tra chương trình với các biến của bán kính R lần lượt như sau 5,20,10,5,300.
giúp mình với ạ
Cho biểu thức y = 5 - 2x. Em hãy viết chương trình Pascal tính và in ra màn hình giá trị y. Với x, y là hai biến của chương trình có kiểu dữ liệu là số nguyên, giá trị của x đươc nhập vào từ bàn phím.
giúp em với mng, cảm ơn mng rất nhiều ạ<3
13 tháng 3 2023 lúc 22:52
Em sử dụng pascal, nếu đc thì có thể ghép bốn câu lại với nhau giúp em :3
Bài1: viết chương trình tính tổng(tích) của N số tự nhiên.
Bài2: viết chương trình tính tổng (tích) từ số n đến m
Bài3: viết chương trình tính tổng (tích) từ 10 đến 25
Bài4: viết chương trình tính tổng các số lẻ(hoặc chẵn) của N số tự nhiên, N được nhập từ bàn phím.
Viết Chương Trình Pascal chiều dài a và chiều rộng của hình chữ nhật.Tính chu vi và diện tích của hình chữ nhật và in kết quả ra màn hình.(a,b là số nguyên dương).
Mọi người giúp em với ạ sắp nộp rồi ạ :((
VIẾT THUẬT TOÁN VÀ CHƯƠNG TRÌNH PASCAL Các bài toán sau Tính giá trị biểu thức a= x2+x+1( với x nhập từ bàn phím ) mong giúp gắp ạ
Giúp em với mọi người ơi chương trình Pascal
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.