Пожалуйста, напишите в Паскале. Напишите программу, которая по заданному числу вычисляет его вторую цифру справа. input.txt 123 -139 9 output.txt 2 3 0
Answers & Comments
gfif19062001
Var a,b,c:integer; begin read(a); b:=a div 10; c:=b mod 10; writeln(c); end.
Answers & Comments
a,b,c:integer;
begin
read(a);
b:=a div 10;
c:=b mod 10;
writeln(c);
end.