Помогите написать программу в pascal.Дан набор слов, разделенных точкой с запятой (;). Набор заканчивается двоеточием (:). Определить, сколько в нем
10-11 класс
|
слов, заканчивающихся буквой а.
var
str: string;
i : byte;
begin
readln(str);
str := str.Replace(':', '');
foreach c: string in str.Split(';') do
if (c[c.Length] in ['a', 'а']) then //не уточнено, какого алфавита "а"
i += 1;
writeln(i);
end.
Комментарий удален
Другие вопросы из категории
окне инструмены анали выделим опцию выборка-затем ок.Но я немогу найти в 7 excel меню сервис(где его искать подскажите),но в 3 excel я нашла сервис но не могу найтианализ данных?!Подскажите.
функцию и пжл с объяснением)
а) Все четные элементы
б) Все элементы, оканчивающиеся нулем.
2. В массиве хранится информация о количестве осадков, выпавших каждый день января. Определить, в какие числа месяца осадков не было.
В паскале. Заранее спасибо.
Читайте также
рдинат. Я поняла, что нужно найти их длины (формулы я знаю), а правильно написать программу не могу
Дано натуральное число n. Написать программу вычисляющую сумму
Дан массив X(N,M). Если первый элемент массива положительный, то найти сумму элементов среди элементов четных строк массива, иначе произведение.
13.
Нужно написать программу на цикле с предусловием, на Паскале.