Решите задачу пожалуйста по информатике в форме паскаль!!!
Дана последовательность 1,3,5,7,.....
Вывести первый член последовательности больше некоторого В.

1
Принялся.
спасибо большое)
Под последовательностью имеется ввиду массив?

Ответы и объяснения

2014-03-19T16:48:39+00:00
Var
b: integer;
begin
readln(b);
if (b mod 2)=0 then write(b+1) else write(b+2);
end.

В условии просто последовательность нечётных чисел. Если b чётное, то ближайшее большее будет больше его на 1. Если b нечётное, то ближайшее большее нечётное будет b+2
С массивом было бы интереснее)
Ну да, но так намного проще.
:)
спасибо огромное;))