Задать вопрос
22 сентября, 09:58

Паскаль. "В заданной строке подсчитать кол-во букв латинского алфавита" при помощи строковой функции "length"

+3
Ответы (1)
  1. 22 сентября, 13:00
    0
    S:string;

    k, i:integer;

    begin

    readln (s) ;

    for i:=1 to length (s) do

    if (ord (s[i]) >64) and (ord (s[i]) <91) then k:=k+1;

    if (ord (s[i]>95) and (ord (s[i]) <123) hen k:=k+1;

    writeln (k) ;

    readln;

    end.
Знаете ответ?
Сомневаетесь в ответе?
Найдите правильный ответ на вопрос ✅ «Паскаль. "В заданной строке подсчитать кол-во букв латинского алфавита" при помощи строковой функции "length" ...» по предмету 📘 Информатика, а если вы сомневаетесь в правильности ответов или ответ отсутствует, то попробуйте воспользоваться умным поиском на сайте и найти ответы на похожие вопросы.
Смотреть другие ответы