Các câu hỏi tương tự
Cho chương trình sau:procedure thutuc (a, b: integer); Begin … End; Trong chương trình chính có thể gọi lại chương trình con như thế nào A. thutuc; B. thutuc (5, 10); C. thutuc(1, 2, 3); D. thutuc(5);
Đọc tiếp
Cho chương trình sau:
procedure thutuc (a, b: integer);
Begin
…
End;
Trong chương trình chính có thể gọi lại chương trình con như thế nào
A. thutuc;
B. thutuc (5, 10);
C. thutuc(1, 2, 3);
D. thutuc(5);
Cho chương trình sau:procedure thutuc (a, b: integer); Begin … End;Trong chương trình chính có thể gọi lại chương trình con như thế nào: A. thutuc (5, 10); B. thutuc; C. thutuc(1, 2, 3); D. thutuc(5);
Đọc tiếp
Cho chương trình sau:
procedure thutuc (a, b: integer);
Begin
…
End;
Trong chương trình chính có thể gọi lại chương trình con như thế nào:
A. thutuc (5, 10);
B. thutuc;
C. thutuc(1, 2, 3);
D. thutuc(5);
Cho chương trình sau:procedure thutuc (a, b: integer);Begin…End; Trong chương trình chính có thể gọi lại chương trình con như thế nào: A. thutuc; B. thutuc(1, 2, 3); C. thutuc (5, 10); D. thutuc(5);
Đọc tiếp
Cho chương trình sau:
procedure thutuc (a, b: integer);
Begin
…
End;
Trong chương trình chính có thể gọi lại chương trình con như thế nào:
A. thutuc;
B. thutuc(1, 2, 3);
C. thutuc (5, 10);
D. thutuc(5);
Viết lại hoàn chỉnh chương trình tích tổng 4 lũy thừa lũy thừa =a^n+b^n+c^n+d^n trong đó có sử dụng chương trình con là chương trình lũy thừa x^k
cho chương trình: program vd ; var a,b,c:integer; begin readln(a,b,c); writeln((a+b)/2:2:0,a+b+c,(a*b)); end
Viết chương trình Pascal hoàn chỉnh, trong đó có xây dựng các chương trình con để thực hiện một số công việc sau đây và gọi nó trong thân chương trình chính:
1. Nhập vào số nguyên, cho biết số đó là chẵn hay lẻ, âm hay dương;
2. Nhập vào 2 cạnh của hình chữ nhật, tính chu vi, diện tích của nó.
3. Cho 3 số, cho biết ba số đó có thoả mãn là 3 cạnh của một tam giác hay không.
4. Tính N!
5. Tính an.
6. Nhập vào bán kính R của một hình tròn, tính chu vi, diện tích của nó.
7. Biết điểm trung bình của...
Đọc tiếp
Viết chương trình Pascal hoàn chỉnh, trong đó có xây dựng các chương trình con để thực hiện một số công việc sau đây và gọi nó trong thân chương trình chính: 1. Nhập vào số nguyên, cho biết số đó là chẵn hay lẻ, âm hay dương; 2. Nhập vào 2 cạnh của hình chữ nhật, tính chu vi, diện tích của nó. 3. Cho 3 số, cho biết ba số đó có thoả mãn là 3 cạnh của một tam giác hay không. 4. Tính N! 5. Tính an. 6. Nhập vào bán kính R của một hình tròn, tính chu vi, diện tích của nó. 7. Biết điểm trung bình của một học sinh, cho biết bạn đó đạt học lực giỏi, khá, trung bình, yếu hay kém.
Cho đoạn chương trình sau:Var g:text; I:integer;Begin Assign(g, ‘C:DLA.txt’); Rewrite(g); For i:1 to 10 do If i mod 2 0 then write(g, i); Close(g); ReadlnEnd. Sau khi thực hiện chương trình trên, nội dung của tệp ‘DLA.txt’ gồm những phần tử nào? A. 2; 4; 6; 8; 10 B. 1; 3; 5; 9 C. 1; 3; 5; 7; 9 D. 4; 6; 8; 10
Đọc tiếp
Cho đoạn chương trình sau:
Var g:text;
I:integer;
Begin
Assign(g, ‘C:\DLA.txt’);
Rewrite(g);
For i:=1 to 10 do
If i mod 2 = 0 then write(g, i);
Close(g);
Readln
End.
Sau khi thực hiện chương trình trên, nội dung của tệp ‘DLA.txt’ gồm những phần tử nào?
A. 2; 4; 6; 8; 10
B. 1; 3; 5; 9
C. 1; 3; 5; 7; 9
D. 4; 6; 8; 10
Cho đoạn chương trình sau:Var g:text; I:integer;Begin Assign(g, ‘C:DLA.txt’); Rewrite(g); For i:1 to 10 do If i mod 2 0 then write(g, i); Close(g); ReadlnEnd. Sau khi thực hiện chương trình trên, nội dung của tệp ‘DLA.txt’ gồm những phần tử nào? A. 2; 4; 6; 8;10 B. 1; 3; 5; 9 C. 1; 3; 5; 7; 9 D. 4; 6; 8; 10
Đọc tiếp
Cho đoạn chương trình sau:
Var g:text;
I:integer;
Begin
Assign(g, ‘C:\DLA.txt’);
Rewrite(g);
For i:=1 to 10 do
If i mod 2 <> 0 then write(g, i);
Close(g);
Readln
End.
Sau khi thực hiện chương trình trên, nội dung của tệp ‘DLA.txt’ gồm những phần tử nào?
A. 2; 4; 6; 8;10
B. 1; 3; 5; 9
C. 1; 3; 5; 7; 9
D. 4; 6; 8; 10
Cho đoạn chương trình sau:Var g:text; I:integer;Begin Assign(g, ‘C:DLA.txt’); Rewrite(g); For i:1 to 10 do If i mod 2 0 then write(g, i); Close(g); ReadlnEnd. Sau khi thực hiện chương trình trên, nội dung của tệp ‘DLA.txt’ gồm những phần tử nào? A. 2; 4; 6; 8;10 B. 1; 3; 5; 9 C. 1; 3; 5;7; 9 D. 4; 6; 8;10
Đọc tiếp
Cho đoạn chương trình sau:
Var g:text;
I:integer;
Begin
Assign(g, ‘C:\DLA.txt’);
Rewrite(g);
For i:=1 to 10 do
If i mod 2 = 0 then write(g, i);
Close(g);
Readln
End.
Sau khi thực hiện chương trình trên, nội dung của tệp ‘DLA.txt’ gồm những phần tử nào?
A. 2; 4; 6; 8;10
B. 1; 3; 5; 9
C. 1; 3; 5;7; 9
D. 4; 6; 8;10