Question

напишите программу которая вводит трехзначное число и ,,вырезает '' из него 1 и последнюю цифру

Answer 1

//PascalABC.NET
var
a:integer;
begin
readln(a);
writeln(a div 10 mod 10);
end.

//Для 4 значного
//PascalABC.NET
var
a:integer;
begin
readln(a);
writeln(a div 100 mod 10, a div 10 mod 10);
end.

Answer 2

Трехзначное же число по учловию

Answer 3

Блин это мой касяк , извени

Answer 4

Кстати, при a mod 100 выводятся последнее 2-е цифры

Answer 5

А как будет с четырехзначным числом? если не сложно

Answer 6

//PascalABC.NET
var
a:integer;
begin
readln(a);
writeln(a div 100 mod 10, a div 10 mod 10);
end.