Б) 0:05. Это рейс с пересадкой в Москве.
Несмотря на множество рейсов, вариантов перелёта всего 4: прямой до Лондона, с пересадкой в Москве, с пересадкой в Праге и с двумя пересадками в Москве и Праге.
Прямой рейс уже улетел, пассажир будет в Лондоне завтра в 22:25
Через Москву пересадка займёт 20 минут и он будет в Лондоне в 0:05.
Через Прагу не получится, так как Лондонский рейс вылетает за 40 минут до прилёта Киевского и надо сутки ждать в Праге.
А две пересадки тоже не катят, надо полдня ждать в Праге.
Пишется так:
while условие do
begin
Тело цикла
end;
Выполняет тело цикла (команды между begin и end;) пока соблюдено условие в заголовке цикла.
Пример:
while x<100 do
begin
x:= x+1;
end;
Прибавляет к переменной x единицу пока x меньше ста. Если x больше ста, то цикл заканчивается.
Числа ФибоначчиПоследовательность начинается с 0 1
Каждое следующее число равно сумме двух предыдущих
0 1 1 (0+1=1)
0 1 1 2 (1+1=2)
0 1 1 2 3 (1+2=3)
0 1 1 2 3 5 (2+3=5)
и т.д.
Одномерные массивыМассив можно представить как ряд из ящиков
каждый ящик имеет свой номер (индекс)
в ящике лежит значение (цифры или символы)
Объявляются как переменные в начале программы:
program raf105
var название:array[количество элементов] of тип;
количество элементов пишется как диапазон от минимального значения индекса (Индекс это число в квадратных скобках) до максимального между ними ставятся две точки
Пример:
program raf105
var X:array[1..10] of integer;
Это массив под названием X с 10-ю элементами типа integer
Обращение к массиву
Название[индекс]
Пример:
x[8]:= 101;
Мы присвоили восьмому элементу массива под названием x значение 101
Предлагаю вариант покороче, скрин и исходник в приложении.
Складывает все числа (положительные и отрицательные) начиная со второго положительного включительно, то есть второй элемент так же будет задействован.