Причины войны: стремление всех стран к захвату новых территорий, разделу колоний и устранению конкурентов; стремление стран отвлечь внимание народа от внутренних проблем; каждая страна преследовала свою цель:
Германия стремилась расширить свои владения и установить доминирование в мировой политике;
Франция хотела вернуть обратно Эльзас и Лотарингию, а так же захватить Саарский угольный бассейн;
Австро-Венгрия имела территориальные претензии к Сербии, Черногории, Румынии и России, а также стремилась подавить национально-освободительное движение;
Англия стремилась уничтожить Германию, как своего основного соперника в торговли, а также забрать у Турции богатые нефтью земли;
Италия стремилась расширить свое господство на Балканском полуострове;
Россия хотела захватить Константинополь, проливы Босфор и Дарданеллы, а также остановить назревающую в России революцию.
// F# open System [<EntryPoint>] let main argv = let mutable sum = 0 let mutable i = 0 let array = [19..51] while i < array.Length do let value = array.Item i if 5 % value = 0 then sum <- sum + value i <- i+1 Console.WriteLine sum Console.ReadKey true |> ignore 0
// Pascal (for) var sum : integer; i: integer; begin sum := 0; i := 0; for i:=19 to 51 do begin if i mod 5 = 0 then sum := sum + i; end; writeln(sum); end.
// Pascal var sum : integer; i: integer; begin sum := 0; i := 19; while (i <= 51) do begin if i mod 5 = 0 then sum := sum + i; i := i + 1; end; writeln(sum); end.
Россия - принцип почвы и принцип крови.
Великобритания, Франция - принцип почвы
Эстония, Латвия - принцип крови.