Войти Регистрация Спроси ai-bota

Найти произведение нечетных чисел на промежутке от 1 до 8

Нажмите на рекламу ниже и сразу увидите ответ

↓

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

Notch

23.10.2022 13:19

Определите, что будет напечатано в результате работы следующей программы: var s, k: integer; begin s: =0; for k: =1 to 11 do s: =s+12; writeln(s); end....

DOLBONAFT

20.02.2021 18:52

Не могу после того, как вводишь значение n - программа зависает и ничего не делает (pascal abc). в чём проблема? uses crt; var s,n,i,x: integer; a: array[1..100] of integer;...

tibefp33org

18.12.2020 00:51

Сколько натуральных чисел удовлетворяет неравенству: 3168 x de16...

TuyaraPotapova

27.02.2022 04:33

Яка з перелічених програм не є архіватором? winzip drweb 7-zip winrar...

ЕленаЧернова

29.04.2022 22:44

информатика . 1. дан одномерный массив из 10 целых чисел,заданных с клавиатуры. найти сумму элементов этого массива меньших 6. 2. дан одномерный массив из 9 целых чисел,...

1StarTrek1

26.12.2020 08:53

Диагональ квадрата перпендикулярна к некоторой плоскости. Как расположена другая диагональ квадрата по отношению к этой плоскости?...

dimasikmirnyy9

26.12.2020 08:53

Директор ТОО Крома-Ф Суслов предложил финансировать деятельность суда, находящегося недалеко от офиса ТОО...

ksskjskdjdkdk

26.12.2020 08:53

Сколько двугранных углов имеет: а) тетраэдр; б) параллелепипед?...

nazarovamarish

26.12.2020 08:53

Отрезок ВМ перпендикулярен к плоскости прямоугольника ABCD. Докажите, что прямая CD перпендикулярна к плоскости MBС...

n254n

26.12.2020 08:53

Точка А лежит в плоскости α, а точка В удалена от этой плоскости на расстояние 9 см. Точка М делит отрезок АВ в отношении 4:5, считая от точки...

Ответ:

Horse3333

02.10.2020 13:29

Var p,i: integer;
begin
p:=1;
for i:=1 to 8 do
if (i mod 2 <> 0) then
p:=p*i;
writeln(p);
end.

0,0(0 оценок)

Полный доступ

Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota Оформи подписку