Question

Дано целое число. Напишите программу, которая уменьшает это число в 2 раза и выводит на экран монитора результат.

Answer 1

var x:integer;
begin
read(x);
write(x/2);
end.