giúp mình làm bài này với: (pascal) Cho 2 xâu S1,S2 được nhập vào từ bàn phím. Viết chương trình kiểm tra xem có bao nhiêu ký tự trùng nhau và in các ký tự đó ra màn hình.

hoann6815

2 năm trước

Loga Sinh Học lớp 12

0 lượt thích 23 xem

1 trả lời

Thích Trả lời

thangthuthao2001

program bai_tap;

uses crt;

var S1, S2 : string;

i, a, dem : integer;

begin

writeln ('Nhap xau S1 va S2');

readln (S1, S2);

dem := 0;

for a := S1 [1] to S1 [length(S1)] do

begin for i := 1 to length(S2) do if S2[i] = a then dem := dem + 1;

if dem >= 1 then writeln (a);

end;

readln;

end.

Vote (0) Phản hồi (0) 2 năm trước

nguyenngockhanhlinh2409

var S1， S2 : string;

i， a， dem : integer;

begin

writeln (‘Nhap xau S1 va S2’);

readln (S1， S2);

dem := 0;

for a := S1 [1] to S1 [length(S1)] do

begin for i := 1 to length(S2) do if S2[i] = a then dem := dem + 1;

if dem >= 1 then writeln (a);

end;

readln;

end.

Vote (0) Phản hồi (0) 2 năm trước

Các câu hỏi liên quan

ném 1 vật nhỏ khối lượng m =100g từ mặt đất (coi là mặt nagng ) với tốc độ v =40 m/s theo phương hướng lên .bỏ qua sức cản lấy g =10m/s .tính độ cao cực đại trong các trường hợp sau a, ném thẳng đứng b; vận tốc phương ngang góc 60°

cho mặt phẳng tọa độ oxy ,cho parabol (p) ; y=x^2 b) cho pt x^2 -(m-1) (x-m)=0 (1) với x là ẩn số ,m là tham số .xác định các giá trị của m để pt (1)có 2 nghiệm pb x1;x2 thỏa mảng điều kiện x1(3-x2)+20>hoặc bằng 3(3-x2)

Khoanh trắc nghiệm tin học giúp e mình

chuyển chủ động sang câu bị động ạ

-Viết 1 đoạn văn khoảng 5 đến 7 câu giới thiệu về 1 quốc gia -Viết đoạn văn về Washington D.C Vt tiếng anh nhé vt khoảng 5 câu đc r

Một chiếc đồng hồ với mặt kính hình tròn có diện tích là 28,26cm vuông . Tính đường kính của mặt đồng hồ đó

mn lam cho minh bai 17 nhe mih cho 5 sao

Giups@@, bài 4 nhoa, thanksssssssssss

Giúp mình câu này ạ https://hoidap247.com/cau-hoi/485682

Rewrite the following sentences, beginning as shown, so that the meaning stays the same. 1.My brother plays football very well. =>My brother is . 2.Mai likes playing badminton most. =>Badminton is . 3.Sports and games are very important in children's lives. =>Sports and games play . 4.Children take part in many after-school activities when school finishes. =>Children do . 5.Lan is very good at basketball. =>Lan can

Loga.vn - Cộng Đồng Luyện Thi Trực Tuyến