profile
Опубликовано 5 лет назад по предмету Информатика от dasha72998

сколько раз встречается буква "а" во введенной с клавиатуры строки. Составить алгоритмическую программу.​

  1. Ответ
    Ответ дан raf1O5

    program raf105;

    var

     s:string;

     a,i:integer;

    begin

    write('Введите строку: ');

    readln(s);

    s:= lowercase(s);

    for i:=1 to length(s) do

     if s[i] = 'а'

       then a+= 1;

    writeln('В ведённой строке буква "а" встречается ',a,' раз(а)');

    end.

    Язык PascalABC