Ответы
Ответ дал:
0
var
i,j,k:integer;
begin
randomize;
k=random(999);
if k mod 2 <> 0 then
k:=k+1;
write(k);
end.
Похожие вопросы
2 года назад
7 лет назад
10 лет назад