Предмет: Информатика,
автор: anton48f
Сегодня в индийском городке
Старый Гоа отмечают День святого Франциска Ксавьера. Святой Франциск Ксавьер –
миссионер, член ордена иезуитов, считается величайшим католическим миссионером
Нового времени.
Мощи святого Франциска Ксавьера
– духовного покровителя индийских христиан – покоятся в Старом Гоа в известном
католическом храме – Базилике Бом Иисус. Со дня постройки храма в 1605 году раз
в десять лет мощи святого выставляются для всеобщего обозрения.
Индийский крестьянин Вирмарам –
человек очень набожный, он не упускал случая коснуться святых мощей. Зная годы
его жизни, определите, сколько раз он мог коснуться святых мощей (считается,
что в год своего рождения он не мог этого сделать, а в год смерти – мог).
Входные данные
Вводятся два натуральных числа
– год рождения и год смерти. Числа разделены пробелом.
Выходные данные
Программа должна определить,
сколько раз крестьянин мог коснуться святых мощей, и вывести ответ - одно
число.
Примеры Входной
файл. Input.txt
Выходной файл. Output.txt
1610-1640
=3
1615-1645
=
3
1515-1545
=0
Ответы
Автор ответа:
0
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.
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.
Похожие вопросы
Предмет: Биология,
автор: artem999193
Предмет: Алгебра,
автор: basyrova00
Предмет: География,
автор: lizapopivchak
Предмет: Математика,
автор: Татьяна1777
Предмет: Химия,
автор: Lauren