Помогите срочно!!! Составьте алгоритм позволяющий вывести на экран среднюю цифру некоторого числа введенного с клавиатуры. Алгоритм должен работать для чисел с нечетным кол-вом цифр.
Answers & Comments
Ramires01
Var a:integer; begin writeln('введите трехзначное число: '); readln(a); a:=a mod 100 div 10; writeln('средняя цифра: ',a); end.
Answers & Comments
begin
writeln('введите трехзначное число: ');
readln(a);
a:=a mod 100 div 10;
writeln('средняя цифра: ',a);
end.