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

Сегодня в индийском городке старый гоа отмечают день святого франциска ксавьера. святой франциск ксавьер – миссионер, член ордена иезуитов, считается величайшим католическим миссионером нового времени. мощи святого франциска ксавьера – духовного покровителя индийских христиан – покоятся в старом гоа в известном католическом храме – базилике бом иисус. со дня постройки храма в 1605 году раз в десять лет мощи святого выставляются для всеобщего обозрения. индийский крестьянин вирмарам – человек набожный, он не упускал случая коснуться святых мощей. зная годы его жизни, определите, сколько раз он мог коснуться святых мощей (считается, что в год своего рождения он не мог этого сделать, а в год смерти – мог). входные данные вводятся два натуральных числа – год рождения и год смерти. числа разделены пробелом. выходные данные программа должна определить, сколько раз крестьянин мог коснуться святых мощей, и вывести ответ - одно число. примеры входной файл. input.txt выходной файл. output.txt 1610-1640 =3 1615-1645 = 3 1515-1545 =0

Показать ответ
Ответ:
Koshmmarik
Koshmmarik
22.06.2020 06:00
Var i, byear, eyear, k : integer;
Begin
  read(byear, eyear);
  byear := byear + 1;

  for i := byear to eyear do
    if (i >= 1605) and ((i - 1605) mod 10 = 0) then k:= k +1;
    
  writeln(k);
End.
0,0(0 оценок)
Популярные вопросы: Информатика
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota Оформи подписку
logo
Начни делиться знаниями
Вход Регистрация
Что ты хочешь узнать?
Спроси ai-бота