Написать задачу на языке PascalABCПо одну сторону улицы находятся дома с
Написать задачку на языке PascalABC
По одну сторону улицы находятся дома с нечетными номерами (1,3,5,..),
по иную сторону- четными (2,4,6,..). Дом 1 находится напротив дома 2, дом 3- против дома 4 и тд. До примыкающего дома нужно идти вдоль по улице одну минутку, маловажно, с какой стороны улицы он находится (то есть от дома 1 необходимо идти одну минутку как до дома 3, так и до дома 4). До дома, стоящего против, идти не необходимо.
Человек вышел на улицу из дома А и обязан дойти до дома В. Обусловьте, сколько минут ему необходимо идти вдоль по улице.
Программа получает на вход два разных целых положительных числа А и В, не превосходящие 210(в 9 ступени), - номера домов. Программка обязана вывести одно число-искомое количестао минут.
Пример входных и выходных данных :
Ввод : 1 , 8
Вывод: 3
begin
var a:=ReadInteger;
var b:=ReadInteger;
var min:=0.0;
for var i:=a to b do
begin
min+=0.5;
end;
If odd(a) and not odd(b) then
write(min-1);
If not odd(a) and odd(b) then
write(min);
If (not odd(a) and not odd(b)) or (odd(a) and odd(b)) then
write(min-0.5);
end.
Вроде так, но не уверен!
-
Вопросы ответы
Статьи
Информатика
Статьи
Математика.
Разные вопросы.
Разные вопросы.
Математика.
Разные вопросы.
Математика.
Физика.
Геометрия.
Разные вопросы.
Обществознание.