ПЕ
Павел Ермачков

Дано натуральное число. Найти вторую (с начала) цифру данного число. нужно записать на Паскале.

Найти вторую (с начала) цифру данного число. нужно записать на Паскале.

ЮС
Юлия Соболева

var a:integer;
begin
readln(a);
while (a div 100)>0 do
a:=a div 10;
writeln(a mod 10);
end.

Похожие вопросы
дано натуральное число n вычислить сколько цифр в числе n и чему равна сумма его цифр паскаль
Дано натуральное число. 1) приписать к нему такое же2)Найти количество различных цифр данного натурального числа. паскаль
Дано натуральное число. Из данного натурального числа удалить все цифры а. (а вводится с клавиатуры) в паскале пожалуйста
Задача в паскале. Дано натуральное число. Сумму цифр числа, больших а (значение а вводится с клавиатуры, 0
Сколько и каких цифр понадобится, чтобы записать все натуральные числа, меньшие 10^n?
дано натуральное 5 значное число n.Сколько раз в данном числе встречаются цифры 4 или 8?записать в delphi
задано натуральное число n. Найти сумму цифр данного числа с помощью функции !!!(паскаль)
Дано натуральное число. Определить, сколько раз в числе встретилась его максимальная цифра
помогите с паскалем. Дано натуральное число. Найти число, получаемое при прочтении его цифр справа налево;
Как записать в Паскале как записать данное число в Паскале e^y*b