В
Все
У
Українська література
Г
Геометрия
Д
Другие предметы
Э
Экономика
Г
География
О
ОБЖ
М
Математика
М
МХК
Х
Химия
Қ
Қазақ тiлi
Л
Литература
У
Українська мова
О
Обществознание
Ф
Физика
А
Английский язык
А
Алгебра
И
История
Б
Беларуская мова
Б
Биология
М
Музыка
П
Право
И
Информатика
П
Психология
В
Видео-ответы
Н
Немецкий язык
Ф
Французский язык
О
Окружающий мир
Р
Русский язык

Новое знание представлено в виде обнаруженных исследователем неизвестных ранее, описанных впервые или заново изученных феноменов,

Ответ:
Индира1973
Индира1973
31.05.2020 01:26

var a,b,pro:int64;
begin
  pro:=1;
  readln(a, b);
  repeat
    if((a mod 4) =0) then pro:=pro*a;
    inc(a);
  until(a>b);
  writeln(pro);
  readln;
end.

0,0(0 оценок)
Популярные вопросы: Другие предметы
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota Оформи подписку
logo
Начни делиться знаниями
Вход Регистрация
Что ты хочешь узнать?