Задать вопрос
18 ноября, 05:48

На Pascale

Дано натуральное число n (n10).

+3
Ответы (1)
  1. 18 ноября, 08:30
    0
    Var

    n:integer;

    c:string;

    begin

    write ('Введите число от 10 до 9999 - >') ;

    readln (n) ;

    Str (n, c) ;

    writeln ('Предпоследняя цифра в числе равна ', c[length (c) - 1])

    end.

    Пример работы программы:

    Введите число от 10 до 9999 - >1523

    Предпоследняя цифра в числе равна 2
Знаете ответ на вопрос?
Не уверены в ответе?
Правильный ответ на вопрос 👍 «На Pascale Дано натуральное число n (n10). ...» по предмету 📗 Информатика. Развернутая система поиска нашего сайта обязательно приведёт вас к нужной информации. Как вариант - оцените ответы на похожие вопросы. Но если вдруг и это не помогло - задавайте свой вопрос знающим оппонентам, которые быстро дадут на него ответ!
Искать готовые ответы