1. Дано 3-х знакове число. Обчислити значення другої цифри в числі. Напр. х=456 -> y=5

Question

1. Дано 3-х знакове число. Обчислити значення другої цифри в числі. Напр. х=456 -> y=5

Answer 1

Var x,y:integer;
begin
write('x = ');
readln(x);
y:=x div 10 mod 10;
writeln('y = ',y);
end.

Пример:
x = 456
y = 5