Войти
Регистрация
Спроси ai-bota
В
Все
М
Математика
А
Английский язык
Х
Химия
Э
Экономика
П
Право
И
Информатика
У
Українська мова
Қ
Қазақ тiлi
О
ОБЖ
Н
Немецкий язык
Б
Беларуская мова
У
Українська література
М
Музыка
П
Психология
А
Алгебра
Л
Литература
Б
Биология
М
МХК
О
Окружающий мир
О
Обществознание
И
История
Г
Геометрия
Ф
Французский язык
Ф
Физика
Д
Другие предметы
Р
Русский язык
Г
География
Показать больше
Показать меньше
vika2075
07.06.2023 14:54 •
Информатика
Написать программу для pascаl: вычислить произведение всех четных чисел от 50 до 100
Показать ответ
Ответ:
Alina2627848
03.10.2020 11:03
Var
i:integer;
p:biginteger;
begin
p := 1;
for i := 50 to 100 do
if i mod 2 = 0 then p := p * i;
writeln(p);
end.
Тестовое решение:
3289645422013119007424590987918048021708800000000
0,0
(0 оценок)
Популярные вопросы: Информатика
viktoriakeda
23.04.2021 12:25
2. Какие клавиши используются для ввода заглавных буквпри наборе текстовой информации?а) Ctrl и Alt6) Shift и Tabe) Shift Caps Lock...
gggg132
04.02.2020 21:54
Какие цифры входят в алфавит десятичной системы счисления двоичной системы счисления восьмеричной системы счисления шестнадцатеричной системы счисления...
monyamirzoeva
04.06.2022 10:46
А9. не надо я все нашел...
Ellis2034
28.04.2022 11:11
Условие : покупатель должен заплатить в кассу s рублей. у него имеются 10, 50, 100, 500, 1000 и 5000 рублей сколько купюр разного достоинства отдаст покупатель,...
nacny2016
31.10.2020 02:17
Найти решение цифрового корня в одну строку (ну или не в одну) с++...
alesa6002
24.09.2022 17:28
ответить вообще не знаю какой ответ...
JustTkach
04.10.2021 10:12
Где лучше выдерживать жару в сухом или влажном месте? почему?...
danilfag
05.11.2020 10:02
Давление на поверхность площадь которой равна 400см² составляет 2000 па. найдите силу действующую на поверхность...
dianaorlova00
21.01.2020 02:49
Прочитай. напиши, о чём обычно просят тебя. можно ли согласиться с требованием героя стихотворения? почему? сделай вывод, как пишется не с глаголами. завести велели...
bobo6226
04.10.2021 10:12
Какая сила является парной по 3 закону ньютона для веса тела,лежащего на столе?...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
Спроси ai-бота
i:integer;
p:biginteger;
begin
p := 1;
for i := 50 to 100 do
if i mod 2 = 0 then p := p * i;
writeln(p);
end.
Тестовое решение:
3289645422013119007424590987918048021708800000000