Информатика, опубликовано 2018-08-22 23:21:12 by Гость
Составьте программу которая выводит на экран нечетные числа от 1 до 50 в порядке убывания)
Ответ оставил Гость
3)
var
i: Integer;
begin
for i := 50 downto 1 do
if (i and 1) = 1 then {либо (i mod 2)=1, либо Odd(i)}
WriteLn(i);
end.
Не нашли ответа?
Если вы не нашли ответа на свой вопрос, или сомневаетесь в его правильности, то можете воспользоваться формой ниже и уточнить решение. Или воспользуйтесь формой поиска и найдите похожие ответы по предмету Информатика.