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.
Hãy nhập câu hỏi của bạn vào đây, nếu là tài khoản VIP, bạn sẽ được ưu tiên trả lời.
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.
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;
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
hình như ct bạn viết sai a
chương trình sai rồi nhé bạn