Вывести в обратном порядке последнее слово строки. Подсчитать количество букв в нем.
5-9 класс
|
на Паскаль (для Delphi и Lazarus, надо подкорректировать для PascalABC):
const
V=255;
type L= array [1..V] of char;
var
S: string;
A: L;
f,i: integer;
begin
read(S);
f:=0;
for i:=1 to Length(S) do
begin
if S[i]<>' ' then begin f:=f+1; A[f]:=S[i] end
else f:=0;
end;
for i:=f downto 1 do write(A[i]);
writeln(' ',f);
readln;
readln
end.
Другие вопросы из категории
квадратный сантиметр содержит 1764 точки? Необходимо вычислить информационный объем в Кбайт смешанного документа (с точностью до сотых).
Читайте также
«AB».
Каждая из последующих цепочек создается такими действиями: в начало записывается буква, следующая по алфавиту, далее записывается предыдущая строка и она же в обратном порядке символов (справа налево).
Вот первые 4 строки, созданные по этому правилу:
(1) AB
(2) BABBA
(3) CBABBAABBAB
(4) DCBABBAABBABBABBAABBABC
Сколько раз буква А встречается в 8-ой строке?
из четырех букв, такие что соседние буквы в каждом слове различны и все слова отличаются друг от друга хотя бы одной буквой. Слова, состоящие из одинаковых букв, но стоящих в разном порядке считаются различными. Сколько получилось таких слов? В ответе укажите целое число.
Можно пожалуйста с подробным решением?
2.Дано предложение,определить длину последнего слова.
2)В диапазоне от 0 до 50 подсчитать количество чисел сумма цифр которых равна 3.
цепочек создается такими действиями: в очередную строку сначала записывается буква, чей порядковый номер в алфавите соответствует номеру строки (на i-м шаге пишется "i"-я буква алфавита), к ней слева и справа приписывается предыдущая строка. Вот первые 3 строки, созданные по этому правилу:
(1) A
(2) ABA
(3) ABACABA
Запишите шесть символов подряд, стоящие в седьмой строке со 122-го по 127-е место (считая слева направо).