Дана строка, состоящая из заглавных английских букв и цифр. Определить порядковый номер последней цифры - Pascal

Узнай цену своей работы

Формулировка задачи:

помогите решить задачу!

Решение задачи: «Дана строка, состоящая из заглавных английских букв и цифр. Определить порядковый номер последней цифры»

textual
Листинг программы
var s: string;
    i, k: integer;
begin
  writeln('Enter string:');
  readln(s);
  k := 0;
  for i := 1 to length(s) do if s[i] in ['0'..'9'] then k := i;
  if k = 0
    then writeln('No digits in string.')
    else writeln('Last digit in ', k, ' position.');
  readln
end.

Оцени полезность:

8   голосов , оценка 3.75 из 5
Похожие ответы