Question

Дано пятизначное число А. Составить программу, которая находила б среднюю цифру данного числа.

Answer 1

Ответ:

var  

a:integer;

begin

readln(a);

a := (a div 100) mod 10;

print(a);

end.

Объяснение: