Информатика, опубликовано 06.06.2020 11:13
Капитан пришел на берег реки со своими любимцами попугаем, обезьяной и бананами. Ему нужно переправиться на правый берег. Но плот, который находится на левом берегу, слишком мал: он может выдержать только двух пассажиров — либо капитана с попугаем, либо капитана с обезьяной, либо капитана с бананами. Если на одном берегу оставить попугая и кролика, то попугай будет обижать обезьяну, а если оставить обезьяну и бананы, то она их съест. Только в присутствии капитана они не безобразничают. За сколько рейсов капитан переправится со своими питомцами на другой берег?
Ответы
Ответ оставил: Гость
// PascalABC.NET 3.3, сборка 1590 от 03.12.2017// Внимание! Если программа не работает, обновите версию!
begin
Range(0,100,2).Println
end.
Результат
0 2 4 6 8 10 12 14 16 18 20 22 24 26 28 30 32 34 36 38 40 42 44 46 48 50 52 54 56 58 60 62 64 66 68 70 72 74 76 78 80 82 84 86 88 90 92 94 96 98 100
Ответ оставил: Гость
В клетке B, потому что в А он упрётся в стенкуОтвет оставил: Гость
Var i, max,min: integer; mas:array[1..12] of integer;begin for i := 1 to 12 do read(mas[i]); max:=mas[1]; min:=mas[1]; for i:=1 to 12 do begin if mas[i] > max then max:=mas[i]; if mas[i] < min then min:=mas[i]; end; write(max,,min);end.Ответ оставил: Гость
У вкладцi "Головна" зверху на панелi
Другие вопросы по информатике
Информатика, опубликовано 09.01.2019 16:01
Информатика, опубликовано 09.01.2019 16:01
Информатика, опубликовано 09.01.2019 16:01
Информатика, опубликовано 09.01.2019 16:01
