Здесь Вы можете найти ответы на многие вопросы или задать свой вопрос!
var a: integer; beginreadln(a); write (a div 10); end.
var n,z: longint;
begin
read(n);
z: =abs(n);
z: =z-2;
writeln(z);
end.
Популярные вопросы