tutotveti.ru
Предметы
Биология
Українська мова
Музыка
Французский язык
Физика
МХК
Обществознание
Психология
ОБЖ
Право
Беларуская мова
Литература
Химия
Українська література
Экономика
Немецкий язык
География
Информатика
Қазақ тiлi
Геометрия
Английский язык
Русский язык
Окружающий мир
Алгебра
История
Другие предметы
Видео-ответы
ПОИСК
Войти
Регистрация
Информатика
Найти произведение четных чисел
Найти произведение четных чисел в промежутке от 23 до 5
ValiahmetovaKa
2 22.06.2019 03:00
1
Ответы
Panovamasha33
17.07.2020 12:46
Var i,s:longint;
begin s:=1;
for i:=23 downto 5 do
beginif (i mod 2 = 0)
then s:=s*i;
end;
writeln(s);
end.
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика
deisika7
27.07.2019 20:10
Два прямоугольных треугольника заданы своими катетами. определить, у какого из них площадь больше (создать функцию для вычисления площади прямоугольного треугольника по...
belakova
21.07.2019 07:10
Основные форматы текстовых файлов и их особенности....
Бегемот505
21.07.2019 07:10
12 учащихся любят детектив, 18-фантастику, 3 и то и другое, 1 ничего не читает. сколько человек в классе? если знаете ответ...
skalli05
03.12.2020 12:34
распишите как это решить, ответ будет 20, мне нужны именно действия которые надо проводить чтобы получить 20, благодарю......
hilton1
03.12.2020 12:33
Запишите на языке Python :...
Tori1111111
03.12.2020 12:33
Отметьте все виды файлов, которые можно назвать документами...
sdsdsgttu
03.12.2020 12:31
напишите программу на ПИТОНЕ! Напишите программу, которая выбирает максимальное и минимальное из пяти введённых чисел. Входные данные Входная строка содержит 5 целых чисел,...
Zacloock
14.11.2020 15:29
В массиве хранятся данные о ежедневной температуре в течение августа(случайные числа от 15 до 25).составьте программу для нахождения среднемесячной температуры. C++...
Nastya35116
10.12.2020 11:47
Какую здесь формула подставить?...
Nelly175
10.12.2020 11:50
Нужно дополнить этот фрагмент (расширить ) Программирование...
Популярные вопросы
А) АВ – диаметр окружности с центром О. Найдите координаты центра окружности,...
2
С кем объединились сарматы во 2 веке до н.э. чтобы выступить против...
1
Вычисли полупериметр ромба, радиус и площадь круга, если ∢ MLK =60°...
2
Готовясь к соревнованиям, лыжник в первый день побежал 10 км, затем...
2
Определите энергию излучения (фотона), если длина волны излучения равна...
3
Путешество будущее 3 4предложения ...
3
За счёт чего увеличилось количество поставок нефти на восток и в страны...
1
Какие рослыны розмножаються спорами? а)троянда, б)щитник чоловичий;...
3
Тато спорудив теплицю для вирощування огірків. Довжина теплиці становить...
1
Разложить число 650 на множители...
2
begin s:=1;
for i:=23 downto 5 do
beginif (i mod 2 = 0)
then s:=s*i;
end;
writeln(s);
end.