Chương trình sau thực hiện công việc gì ?kết quả vủa trương trình đó?
Var S,i : integer
Begin
A:=0
For i:=3 to 10 đó
S:=S*i;
Write('S=',S:3);
End.
Những câu hỏi liên quan
Chương trình Pascal sau đây thực hiện hoạt động nào?
var i,s: integer;
begin
s:=0;
for i:=1 to 1000 do
s:=s+i;
end.
Câu 1: Sau khi thực hiện chưng trình pascal sau đây, biến S có giá trị là bao nhiêu ? Var x : integer;
Begin
S:=0
For i:=1 to 10 do
If ( i mod 2) = 0 then S:=S+i;
Readln;
End
A.10 B. 20 C. 30 D. 40
Câu 2: Khi thực hiện đoạn chương trình sau, kết quả trên màn hình là:
So:=1;
While so<10 do Begin
Write (so : %);
So:= So +2;
End.
uses crt; var i,S:Integer; begin clrscr; (1) for i:=1 to 50 do (2) if (i mod 2=0) then S:=S+i; (3) writeln('S=',S); (4) readln; (5) end. CÂU HỎI: a) Chương trình trên đang thực hiện công việc gì ? b) Cho biết ý nghĩa của câu lệnh (3),(4),(5).
a) tính tổng các số chẵn từ 1 đến 50
b)
(3): lệnh viết kq của ct trên.
(4):lệnh in ra màn hình kq của bài toán.
(5):lệnh kết thúc ct.
Đúng 0
Bình luận (0)
a) Tính tổng các số chẵn từ 1 đến 50
b) (3): Cộng các số chẵn trong khoảng từ 1 đến 50
(4): Xuất tổng
(5): Lệnh chờ đợi chương trình xử lý và chạy
Đúng 0
Bình luận (0)
Viết lại chương trình sau cho đúng: PROGRAM Ten-KTGK-DTNT_Buon Ho VAR i: Real; S: integer; Begin S = 0; For i = 1 To 20 Do S:= S+i; Write (‘Tong S =’ , S) End
PROGRAM Ten_KTGK_DTNT_Buon_Ho;
VAR i: Real;
S: integer;
Begin
S := 0;
For i := 1 To 20 Do
S:= S+i;
Write (‘Tong S =’ , S);
End.
Đúng 0
Bình luận (0)
Cho khai báo mảng Var A: Array[1..10000] of integer; n, i: word; Begin Readln(n); For i:=1 to n do read(A[i]); End. Chương trình trên thực hiện công việc nào
thực hiện công việc nhập n số từ bàn phím
Đúng 0
Bình luận (0)
Tìm và sửa lỗi cho chương trình sau:Bài 1:Program bai 1;Var x; n: integer;Begin X12 Write(n:4,x:4);ReadInEnd.Bài 2:Program 2bai;Var i, n, s:real;Begin S:0 For i:0.5 to n do SS+i; Write(s); ReadInEnd.
Đọc tiếp
Tìm và sửa lỗi cho chương trình sau:
Bài 1:
Program bai 1;
Var x; n: integer;
Begin
X=12
Write(n:4,x:4);
ReadIn
End.
Bài 2:
Program 2bai;
Var i, n, s:real;
Begin
S:=0
For i:=0.5 to n do
S=S+i;
Write(s);
ReadIn
End.
Bài 1
Lỗi:
1) Program bai 1; => sửa: Program bai1;
2) Var x; n: integer; => sửa: Var x, n:integer;
3) X = 12 => sửa: x:=12;
-------------------
Bài 2
Lỗi
1) Program 2bai; => sửa: Program bai2;
2) Var i, n, s:integer;
3) S:=0 => sửa S:=0;
4) For i:=0,5 to n do => sửa: For i:=1 to 5 do
5) S=S+i; => sửa: S:=S+i;
Đúng 2
Bình luận (0)
Chương trình Pascal sau đây thực hiện hoạt động nào?var i: integer;beginfor i:1 to 99 do;end. A. Chương trình chạy biến i từ 1 đến 100. B. Chương trình chạy biến i từ 1 đến 99 rồi không làm gì cả. C. Chương trình chạy biến i từ 1 đến 100 rồi không làm gì cả. D. Chương trình chạy biến i từ 1 đến 99.
Đọc tiếp
Chương trình Pascal sau đây thực hiện hoạt động nào?
var i: integer;
begin
for i:=1 to 99 do;
end.
A. Chương trình chạy biến i từ 1 đến 100.
B. Chương trình chạy biến i từ 1 đến 99 rồi không làm gì cả.
C. Chương trình chạy biến i từ 1 đến 100 rồi không làm gì cả.
D. Chương trình chạy biến i từ 1 đến 99.
Chương trình Pascal sau đây thực hiện hoạt động nào?
var i: integer;
begin
for i =1 to 101 do;
end.
A. Chương trình chạy biến i từ 1 đến 101.
B. Chương trình chạy biến i từ 1 đến 100.
C. Chương trình chạy biến i từ 1 đến 101 rồi không làm gì cả.
D. Kết quả khác.
Trong ngôn ngữ lập trình pascal đoạn chương trình sau thực hiện công việc gì S1 := 'hong'; S2 := 'hoa'; i :=pos(S2, S); While i 0 do Begin Delete(S,i,2); Insert(S1,S,i); i := pos (S2,S); End;
Sửa đề: S:='hong'
Đoạn chương trình thực hiện chương trình chèn xâu s1 vào xâu s
Đúng 1
Bình luận (0)