Bài 17: Chương trình con và phân loại
Các câu hỏi tương tự
giúp mình vs người ta bảo Chú ý bỏ cái ngoặc chỗ Rewrite ra nha, nếu không Code sẽ lỗi, sau lần đầu tiên dùng nên đóng cái đó lại mà mình không hiểu
Begin
reset(f);
i : 0;
repeat
inc(i);
Readln(f,s[i]);
until s[i]
rewrite(f);
for j : 1 to i-1 do
writeln(f,s[j]);
if kt then
Writeln(f,Am)
else
Writeln(f,kt,Am);
Close(f);
End;Begin
reset(f);
i : 0;
repeat
inc(i);
Readln(f,s[i]);
until s[i]
rewrite(f);
for j : 1 to i-1 do
writeln(f,s[j]);
if kt then
Writeln(f...
Đọc tiếp
giúp mình vs người ta bảo Chú ý bỏ cái ngoặc chỗ Rewrite ra nha, nếu không Code sẽ lỗi, sau lần đầu tiên dùng "nên" đóng cái đó lại mà mình không hiểu
Begin reset(f); i := 0; repeat inc(i); Readln(f,s[i]); until s[i] = '' rewrite(f); for j := 1 to i-1 do writeln(f,s[j]); if kt = '' then Writeln(f,Am) else Writeln(f,kt,Am); Close(f); End;Begin reset(f); i := 0; repeat inc(i); Readln(f,s[i]); until s[i] = '' rewrite(f); for j := 1 to i-1 do writeln(f,s[j]); if kt = '' then Writeln(f,Am) else Writeln(f,kt,Am); Close(f); End; Mã:Chú ý bỏ cái ngoặc chỗ Rewrite ra nha, nếu không Code sẽ lỗi, sau lần đầu tiên dùng "nên" đóng cái đó lại Mã:
Em biết giờ này hỏi bài là hơi kì ạ. Nhưng mà mai thi mất tiêu r ạ. Các anh chị có thể giúp em vs không ạ. Sáng mai em phải nộp r ạ.😖😖😖viết ctrinh n≤ 10000 nguyên dương. Viết ra số lượng số nguyên tố và 10 giá trị số nguyên tố lớn hơn cả Dữ liệu vào: file B5.INP.TXT. Có dòng đầu là số n. Từ dòng kế ghi lần lượt n số cách nhau dấu cách hoặc xuống dòng KQ ra: ghi file B5.OUT.TXT dòng đầu ghi số lượng số nguyên tố dòng kế ghi 10 giá trị số nguyên tố lớn hơn cả được cách nhau bằng dấu cách BÀI 2...
Đọc tiếp
Em biết giờ này hỏi bài là hơi kì ạ. Nhưng mà mai thi mất tiêu r ạ. Các anh chị có thể giúp em vs không ạ. Sáng mai em phải nộp r ạ.😖😖😖
viết ctrinh n≤ 10000 nguyên dương. Viết ra số lượng số nguyên tố và 10 giá trị số nguyên tố lớn hơn cả
Dữ liệu vào: file B5.INP.TXT. Có dòng đầu là số n. Từ dòng kế ghi lần lượt n số cách nhau dấu cách hoặc xuống dòng
KQ ra: ghi file B5.OUT.TXT dòng đầu ghi số lượng số nguyên tố dòng kế ghi 10 giá trị số nguyên tố lớn hơn cả được cách nhau bằng dấu cách
BÀI 2
Viết chương trình đọc các dòng trong một file văn bản độ dài dòng (255 ký tự, số dòng ≤ 50000). Tính ra số từ trong file( từ nằm trọn trên dòng), và dòng có số từ nhiều nhất là bao nhiêu từ, có bao nhiêu dòng như vậy.
Dữ liệu vào : file B6-INT.TXT gồm nhiều dòng văn bản.
KQ ra: file B6-OUT.TXT dòng đầu ghi tổng số từ vủa file, dong 2 ghi số từ nhiều nhất của 1 dòngvà số dòng có số từ nhiều nhất
giúp mik với ạ
viết chương trình con thực hiện các công việc sau
a. nhập đọ dài 3 cạnh của tam giác
b. tính diện tích tam giác
mình cảm ơn nhiều ạ
Em hãy so sánh điểm giống và khác nhau giữa biến toàn cục và biến cục bộ.mn giúp mk với ạ
mọi người ơi giúp em giải bài tập pascal này với ai!! em xin cám ơn mọi người nhiều ạ!
viết chương trình con gồm có function và procedure
- nhập a, b, c
- tính tổng a, b, c
- tìm giá trị max
- sắp xếp
- hoán đổi
Viết chương trình nhập vào mảng A gồm N số nguyên A1,A2,.....,An. Sau đó in ra màn hình :
a) Số lượng số chẵn và số lẻ trong dãy
b) Tổng các số chẵn và tổng các số lẻ trong dãy
(Lưu ý: dùng chương trình con để đảm bảo các số chẵn ,số lẻ,tính tổng chẵn và tổng các số lẻ).
Mọi người giúp em câu này với ạ. Em thi vào dạng này mà em không biết làm:(
giúp mình với ạ
Đề: Dùng thủ tục để thay xâu X1 = xâu X2 trong xâu S. Cho S, X1,X2 nhập từ bàn phím.
Cảm ơn ạ
mọi người giúp mình vs mình cần gấp ạ
Bài 1: Viết chương trình nhập vào 1 mảng gồm N số nguyên (0<N<=300). Tính tổng các phần tử lẻ ở vị trí chẵn
Bài 2: Viết chương trình tính tổng 2 số nguyên nhập từ bàn phím. Trong đó có sử dụng chương trình con tính tôgr 2 số
(Ptso.*) Phân tích 1 số tự nhiên thành tổng các số tự nhiên khácnhau nhỏ hơn nó. pascal ạ
Đọc tiếp
(Ptso.*) Phân tích 1 số tự nhiên thành tổng các số tự nhiên khác
nhau nhỏ hơn nó. pascal ạ