1. Информатика
  2. Турбо паскаль. написать программу,

Турбо паскаль. написать программу, которая считает количество буквы в строке. допустим букву "а" в любом регистре, строка вводится с клавиатуры. входной файл: предложение выходной файл: количество буквы

fasgame fasgame    2   01.10.2019 14:10    4

Ответы
kimas98 kimas98  09.10.2020 07:54

uses Crt;


const

 n=100; { мах длина строки }

 

var

 s:string[n];

 i,k:integer;


begin

 ClrScr;

 Readln(s);

 k:=0;

 for i:=1 to Length(s) do

   if (s[i]='а') or (s[i]='А') then Inc(k);

 Writeln(k);

 ReadKey

end.

ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика
natslig natslig  10.06.2019 11:50
Примеры использования компьютеров ( напишите )...
VanekPhantom VanekPhantom  13.03.2021 15:39
Запишите условие которое означает одно из значений переменных a или b равно нулю . Заполните пропуски, удалите неверно логическую операцию: ( . . . ) ... ( . . . )Запишите...
Аркаша2281337 Аркаша2281337  13.03.2021 15:41
, если не сложно, то с условием. Пользователь создал сообщение из 756 символов в кодировке, в которой каждый символ кодируется 8 битами. После редактирования информационный...
som1712 som1712  13.03.2021 15:43
БУДЬ ЛАСКАА В ПРОГРАМІ PYTHON На вході маємо 2 цілі числа (наприклад a і b). Програма повинна виконати дії: 1) (а+b)a; 2) , за до функцій модуля math. Результат вивести...
karolinaanime karolinaanime  13.03.2021 15:45
Створіть проект у якому вводяться значення елементів табличної велиичини з 8 дійсних чисел у багаторядковому текстовому полі визначається кількість з них які більші за...
Lexa68RUS Lexa68RUS  13.03.2021 15:45
Кто знает, в каком приложении можно скачать Beta Hider для майна??​...
katrin20005 katrin20005  13.03.2021 15:45
2.Позиционная система счисления с основанием 2 6.Одна из частей числа, которое представлено форматом с плавающей точкой 7.Фамилия математика, предложившего геометрическую...
Yanika1buziyaka Yanika1buziyaka  13.03.2021 15:48
Дано число 1,5852E−3. Нормализованная экспоненциальная запись данного числа:...
НикаКолядина2000 НикаКолядина2000  13.03.2021 15:49
Какое число получится, если сложить 91 и 205 в 8-битном формате без знака? ответ запишите в десятичной системе счисления. C объяснением...
ArinaM25 ArinaM25  13.03.2021 15:55
Дана строка, в которой буква h встречается как минимум два раза. Повторите последовательность символов, заключенную между первым и последнием появлением буквы h два раза,...

Популярные вопросы