Пишите язык, на котором вам это нужно. Кто-нибудь же поиздевается и напишет на brainfuck-e.
Паскаль:
var a:integer;
begin
readln(a);
writeln(a/2)
end.
Пусть N - число мест в ряду, M - число рядов в зале
ГистограммыГрафикиКруговые диаграммыЛинейчатые диаграммыДиаграммы с областямиТочечные диаграммыБиржевые диаграммыПоверхностные диаграммыКольцевые диаграммыПузырьковые диаграммыЛепестковые диаграммы
<span>1)
var n,i:integer;
begin
readln(n);
for i:=1 to n do
if n mod i = 0 then write(i,' ');
readln;
end<span>.</span></span>