Паскаль Найти разность между первыми двумя и послед. двумя цифрами заданного...

Question

Паскаль
Найти разность между первыми двумя и послед. двумя цифрами заданного четырехзначного числа.

Answer 1

Program delta;
var
a:longint;
begin
readln(a);
writeln(a div 100-a mod 100)
end.

Comments

Спасибо большое^^