Cho chương trình sau:Program Baitap;Var S1, S2 : string;Procedure Xu_li_xau(a:string; var St:string); Var i: byte; Begin i := pos (a, St); while i < > 0 do begin delete(St, i, 4); i := pos(a, St); end; End;Begin S1 := ‘sen trang, sen hong; S2 := ‘sen’; Xu_li_xau(S2,S1); End.a/ Hãy chạy tay cho ra kết quả theo bảng mẫu dưới đây: b/ Hãy chỉ ra: biến toàn cục, biến cục bộ, tham số hình thức, tham số...
Đọc tiếp
Cho chương trình sau:
Program Baitap;
Var S1, S2 : string;
Procedure Xu_li_xau(a:string; var St:string);
Var i: byte;
Begin
i := pos (a, St);
while i < > 0 do
begin
delete(St, i, 4);
i := pos(a, St);
end;
End;
Begin
S1 := ‘sen trang, sen hong;
S2 := ‘sen’;
Xu_li_xau(S2,S1);
End.
a/ Hãy chạy tay cho ra kết quả theo bảng mẫu dưới đây:
b/ Hãy chỉ ra: biến toàn cục, biến cục bộ, tham số hình thức, tham số thực sự, tham số biến,tham số giá trị trong chương trình trên.
