viết chương trình nhập vào 1 xâu từ bàn phím in ra màn hình các chữ cái có trong xâu khong phân biệt chữ hoa hay chữ thường

viết chương trình nhập vào 1 xâu từ bàn phím in ra màn hình các chữ cái có trong xâu khong phân biệt chữ hoa hay chữ thường

0 bình luận về “viết chương trình nhập vào 1 xâu từ bàn phím in ra màn hình các chữ cái có trong xâu khong phân biệt chữ hoa hay chữ thường”

  1. Program HOC24;

    var s: string;

    i,d: byte;

    begin

    write(‘Nhap xau: ‘); readln(s);

    d:=0;

    for i:=1 to length(s) do if (s[i]=’b’) or (s[i]=’B’) then d:=d+1;

    write(‘Co ‘,d,’ ki tu B trong xau’);

    readln

    end.

    Bình luận

Viết một bình luận