1. Информатика
  2. Найти количество нечетных чисел

Найти количество нечетных чисел от 1 до n

mishakkkk mishakkkk    3   25.08.2019 20:30    1

Ответы
ek72Wasdk ek72Wasdk  05.10.2020 19:33
Var s,n: integer;
begin
read(n);
s:=0;
for var i := 1 to n do if i mod 2 <> 0 then s:=s+1;
writeln(s);
end.
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика
ansher76 ansher76  15.12.2020 14:39
Назови последовательность действий для приготовления яичницу​...
Kruglivnik1ta Kruglivnik1ta  15.12.2020 14:40
ВАРИАНТ 2 Часть 1. Система счисления 1. Переведите числа в десятичную систему счисления: a) 110111110102 б) 2357548 b) 1544B16 2. Переведите целое десятичное число 375 в...
suvorovka06 suvorovka06  25.11.2021 05:16
Укажите, каким может быть условие выполнения цикла, чтобы результат исполнения алгоритма соответствовал изображению (стартовая позиция исполнителя – строка 2, столбец 4)....
ruslankryoi ruslankryoi  25.11.2021 05:15
Что будет изображено на экране в результате выполнения представленного алгоритма? варианты ответов: диагональ рабочего поля (от левого верхнего угла до правого нижнего угла)...
двоищник3 двоищник3  25.11.2021 05:15
Где используется векторная графика...
nmigutsa nmigutsa  25.11.2021 05:14
Програма: користувач вводить 2 числа. Якщо друге число = 0, то програма виводить на екран Не можна ділити на уль . В іншому Вmадку програма діть перше число на другe та виводить...
polina5m polina5m  25.11.2021 05:14
заполнить поля тега img следующими параметрами:...
akur12 akur12  25.11.2021 05:14
Br Br WS r B 14 борсукам та 14 кроликам виділили для їхніх нірок по r B Br ділянці на полі розмірами 8*8. Літерою В позначені ділянки r Для борсуків, літерою — ділянки для...
cherbycorTaiga cherbycorTaiga  25.11.2021 05:14
Укажите, сколько циклов с предусловием включает представленный алгоритм (стартовая позиция исполнителя – левый верхний угол). варианты ответов: 4 1 3...
yecgaass121212 yecgaass121212  25.11.2021 05:13
Провести вычитание и сложение шестнадцатеричных чисел: F116 и 2A16, 45116 и 14716-...

Популярные вопросы