ALGORITHMEN - Teil XXVII: Kaum ist alles richtig, schon stimmt alles!

Oldi-40 · 26. Oktober 2020, 03:09

Hallo p.specht,

Respekt. :top:

So kann man eine fehlerhafte Tastatur bzw. die Blödheit des Users auch interpretieren. :-D

Ich bin gespannt auf die richtige Lösung, "^" ist definitiv falsch.

Da stellt sich mir die Frage, was wäre das richtige Zeichen gewesen?

Tschau

p. specht · 26. Oktober 2020, 15:22

Abt. KAR-06
========
Auf wieviele verschiedene Arten kann man eine Unterhose verkehrt anziehen?

EstherCH · 26. Oktober 2020, 15:27

Kommt auf den Alkoholpegel an. :-)

p. specht · 26. Oktober 2020, 15:36

Also dann kommen sogar noch ein paar Möglichkeiten dazu, siehe HIER.

p. specht · 27. Oktober 2020, 11:53

Abt. Nordpolwanderung
===============
Diesmal müssen sich Menschen nicht mehr bis zum Nordpol durchquälen: Der magnetische Pol kommt womöglich schon bald zu ihnen! Die Wissenschaft ist um Klärung und Nachmodellierung bemüht, um traditionelle Navigationsgeräte funktionsfähig zu halten und das Risiko einer baldigen Pol-Umkehr zu evaluieren: Eigentlich ist die ja überfällig! Das könnte in einigen Gebieten mehr Höhenstrahlung bis zum Erdboden bedeuten. Ein Youtube-Bericht dazu findet sich HIER. Die nächste Weltbild-Änderung?

p. specht · 28. Oktober 2020, 10:20

Abt. Corona-Desinfektion mittels Schnaps??
===========================
... funktioniert nicht wirklich: Eine Desinfektionswirkung gegenüber Viren setzt nämlich erst bei deutlich höheren Konzentrationen von Alkohol ein (ca. 58 %) als gegen Bakterien (42%). Mit Bier (5%) geht erst mal garnichts, Rum (38 %), Schaps (41 %). Korn (48%) helfen eventuell gegen Ängste, aber nicht gegen Corona. Ausserdem kommt es auf die Alkohol-Art an: Professionelle Desinfektionsmittel enthalten etwa 65 % bis 82 % Isopropyl-Alkohol, Ethanol und Propanol. Getrunken macht der je nach Menge aber blind bis tot. Naja, totmachen soll er ja auch, aber nur Krankheitskeime. Hier ein Youtube-Link zum Thema.
Gruss

Volkmar · 28. Oktober 2020, 10:24

Du nimmst mir auch jeden Spaß. Ich wollte gerade eine Buddel Rum holen ;-)

Gruß Volkmar

p. specht · 28. Oktober 2020, 12:06

Theoretisch könnte Bourbon-Wiskey (62,5 bis 80 Volumsprozent) funktionieren. Mit Wodka (bis 52 %) müsste man schon lange gurgeln. Achtung: Auch größerflächige äußere Anwendung macht stock-besoffen (Hautatmung!). Trumps Tipp - Bleichmittel gurgeln - bewirkt ledigllich, daß vor der Himmelstür starkes Gedränge entsteht. Also: Pfoten weg!

p. specht · 30. Oktober 2020, 01:09

Abt. KAR-07
========
A / B = 2
A * B = 2
A - B = ?

Meine Lösung zu KAR-06
---------------------------

Spoiler anzeigen

Oldi-40 · 30. Oktober 2020, 01:50

Zu KAR-06:

Spoiler anzeigen

Zu KAR-07:

2 / 1 = 2
2 * 1 = 2
2 - 1 = 1

Tschau

p. specht · 30. Oktober 2020, 08:34

Abt. KAR-08
========
A * B = 2
A - B = 2
A + B = ?

Lösung zu KAR-07
-------------------

Spoiler anzeigen

ravenheart · 30. Oktober 2020, 09:17

Abt. KAR-05 ´Neue Mathematik´
====================
1 + 1 = 5
2 + 2 = 20
3 + 3 = 45
4 + 4 = ___ ?

1 + 1 = 5 (1*(1*5))
2 + 2 = 20 (2*(2*5))
3 + 3 = 45 (3*(3*5))
4 + 4 = ___ ? (4*(4*5)) = 80

Abt. KAR-06
========
Auf wieviele verschiedene Arten kann man eine Unterhose verkehrt anziehen?

Richtig gekrempelt: 1 (Vorderseite hinten)
Umgekrempelt: 2 (Vorderseite vorn oder hinten)

Antwort: Auf 3 Arten

Abt. Corona-Desinfektion mittels Schnaps??
===========================

Dann empfehle ich Strohrum (80%), Klosterfrau-Melissengeist (79%) oder zumindest Escorial grün (56%)..

Rabe

p. specht · 30. Oktober 2020, 10:22

Bitte zu bedeinken: Brennt wahnsinnig runter und kommt trotzdem nicht in die Bronchien (gottseidank!). Oder ist nur für äußere Anwendung gedacht bzw. sinnvoll! Also bitte Vorsicht, war ja alles nicht ernst gemeint!

p. specht · 30. Oktober 2020, 18:07

Abt. Sterben gehört zum Leben!
====================
Mich hat etwas gestört, daß Corona-Fallzahlen in den "Mainstream-Medien" gerne sensationsgeil als absolute Fallzahlen genannt werden. Deshalb habe ich mir angesehen, wieviele Menschen pro Jahr / pro Monat / pro Woche / pro Tag eigentlich in normalen Jahren ohne Pandemie in den Ländern der Welt sterben. Die Datengrundlagen beziehen sich auf Juni 2019 und enthalten im Hintergrund auch Geburtenraten sowie Lebenserwartungen von Männern und Frauen - für spätere Erweiterungsmöglichkeit. Das beiliegende Programm zeigt die - schlichte Gemüter erschreckende - Normalität in Sachen Lebensende. Ein Halloween-Thema also. Wir verdrängen das nur gerne.
Gruss

TEIL 1:

Quellcode

WindowTitle "Länder-TotePerAnno in normalen Jahren"
Window 0,0-%maxx,%maxy:ShowMax
AppendMenubar 100," Land, Bevölkerung, Sterberate je 1000, Normaljahr-Tote absolut je Zeitspanne:"
'Q: https://de.wikipedia.org/wiki/Liste_von_Staaten_und_Territorien_nach_Einwohnerzahl#Liste
' Land, Einwohnerzahl
VAR b$=\
"China,1433783692#"+\
"Indien,1366417756#"+\
"Europäische Union,446824564#"+\
"Vereinigte Staaten,329064917#"+\
"Indonesien,270625567#"+\
"Pakistan,216565317#"+\
"Brasilien,211049519#"+\
"Nigeria,200963603#"+\
"Bangladesch,163046173#"+\
"Russland,145872260#"+\
"Mexiko,127575529#"+\
"Japan,126860299#"+\
"Äthiopien,112078727#"+\
"Philippinen,108116622#"+\
"Ägypten,100388073#"+\
"Vietnam,96462108#"+\
"Demokratische Republik Kongo,86790568#"+\
"Deutschland,83517046#"+\
"Türkei,83429607#"+\
"Iran,82913893#"+\
"Thailand,69625581#"+\
"Vereinigtes Königreich,67530172#"+\
"Frankreich,65129728#"+\
"Italien,60100075#"+\
"Südafrika,58558270#"+\
"Tansania,58005461#"+\
"Myanmar,54045422#"+\
"Kenia,52573967#"+\
"Südkorea,51225321#"+\
"Kolumbien,50339443#"+\
"Spanien,46736782#"+\
"Argentinien,44780675#"+\
"Uganda,44269587#"+\
"Ukraine,43993643#"+\
"Algerien,43053054#"+\
"Sudan,42813237#"+\
"Irak,39309789#"+\
"Afghanistan,38041757#"+\
"Polen,37887771#"+\
"Kanada,37411038#"+\
"Marokko,36471766#"+\
"Saudi-Arabien,34268529#"+\
"Usbekistan,32981715#"+\
"Peru,32510462#"+\
"Malaysia,31949789#"+\
"Angola,31825299#"+\
"Ghana,30417858#"+\
"Mosambik,30366043#"+\
"Jemen,29161922#"+\
"Nepal,28608715#"+\
"Venezuela,28515829#"+\
"Madagaskar,26969306#"+\
"Kamerun,25876387#"+\
"Elfenbeinküste,25716554#"+\
"Nordkorea,25666158#"+\
"Australien,25203200#"+\
"Taiwan,23773881#"+\
"Niger,23310719#"+\
"Sri Lanka,21323734#"+\
"Burkina Faso,20321383#"+\
"Mali,19658023#"+\
"Rumänien,19364558#"+\
"Chile,18952035#"+\
"Malawi,18628749#"+\
"Kasachstan,18551428#"+\
"Sambia,17861034#"+\
"Guatemala,17581476#"+\
"Ecuador,17373657#"+\
"Niederlande,17097123#"+\
"Syrien,17070132#"+\
"Kambodscha,16486542#"+\
"Senegal,16296362#"+\
"Tschad,15946882#"+\
"Somalia,15442906#"+\
"Simbabwe,14645473#"+\
"Guinea,12771246#"+\
"Ruanda,12626938#"+\
"Benin,11801151#"+\
"Tunesien,11694721#"+\
"Belgien,11539326#"+\
"Burundi,11530577#"+\
"Bolivien,11513102#"+\
"Kuba,11333484#"+\
"Haiti,11263079#"+\
"Südsudan,11062114#"+\
"Dominikanische Republik,10738957#"+\
"Tschechien,10689213#"+\
"Griechenland,10473452#"+\
"Portugal,10226178#"+\
"Jordanien,10101697#"+\
"Aserbaidschan,10047719#"+\
"Schweden,10036391#"+\
"Vereinigte Arabische Emirate,9770526#"+\
"Honduras,9746115#"+\
"Ungarn,9684680#"+\
"Weißrussland,9452409#"+\
"Tadschikistan,9321023#"+\
"Österreich,8955108#"+\
"Papua-Neuguinea,8776119#"+\
"Serbien,8772228#"+\
"Schweiz,8591361#"+\
"Israel,8519373#"+\
"Togo,8082359#"+\
"Sierra Leone,7813207#"+\
"Hongkong,7436157#"+\
"Laos,7169456#"+\
"Paraguay,7044639#"+\
"Bulgarien,7000117#"+\
"Libanon,6855709#"+\
"Libyen,6777453#"+\
"Nicaragua,6545503#"+\
"El Salvador,6453550#"+\
"Kirgisistan,6415851#"+\
"Turkmenistan,5942094#"+\
"Singapur,5804343#"+\
"Dänemark,5771877#"+\
"Finnland,5532159#"+\
"Slowakei,5457012#"+\
"Republik Kongo,5380504#"+\
"Norwegen,5378859#"+\
"Costa Rica,5047561#"+\
"Palästina,4981422#"+\
"Oman,4974992#"+\
"Liberia,4937374#"+\
"Irland,4882498#"+\
"Neuseeland,4783062#"+\
"Zentralafrikanische Republik,4745179#"+\
"Mauretanien,4525698#"+\
"Panama,4246440#"+\
"Kuwait,4207077#"+\
"Kroatien,4130299#"+\
"Moldau,4043258#"+\
"Georgien,3996762#"+\
"Eritrea,3497117#"+\
"Uruguay,3461731#"+\
"Bosnien und Herzegowina,3300998#"+\
"Mongolei,3225166#"+\
"Armenien,2957728#"+\
"Jamaika,2948277#"+\
"Puerto Rico,2933404#"+\
"Albanien,2880913#"+\
"Katar,2832071#"+\
"Litauen,2759631#"+\
"Namibia,2494524#"+\
"Gambia,2347696#"+\
"Botswana,2303703#"+\
"Gabun,2172578#"+\
"Lesotho,2125267#"+\
"Nordmazedonien,2083458#"+\
"Slowenien,2078654#"+\
"Guinea-Bissau,1920917#"+\
"Lettland,1906740#"+\
"Bahrain,1641164#"+\
"Trinidad und Tobago,1394969#"+\
"Äquatorialguinea,1355982#"+\
"Estland,1325649#"+\
"Osttimor,1293120#"+\
"Mauritius,1269670#"+\
"Republik Zypern,1198574#"+\
"Eswatini,1148133#"+\
"Dschibuti,973557#"+\
"Fidschi,889955#"+\
"Réunion,888932#"+\
"Komoren,850891#"+\
"Guyana,782775#"+\
"Bhutan,763094#"+\
"Salomonen,669821#"+\
"Macau,640446#"+\
"Montenegro,627988#"+\
"Luxemburg,615730#"+\
"Westsahara,582458#"+\
"Suriname,581363#"+\
"Kap Verde,549936#"+\
"Malediven,530957#"+\
"Malta,440377#"+\
"Brunei,433296#"+\
"Guadeloupe,400048#"+\
"Belize,390351#"+\
"Bahamas,389486#"+\
"Martinique,375557#"+\
"Island,339037#"+\
"Vanuatu,299882#"+\
"Französisch-Guayana,290823#"+\
"Barbados,287021#"+\
"Neukaledonien,282757#"+\
"Französisch-Polynesien,279285#"+\
"Mayotte,266153#"+\
"São Tomé und Príncipe,215048#"+\
"Samoa,197093#"+\
"St Lucia,182795#"+\
"UK Kanalinseln,172264#"+\
"Guam,167295#"+\
"Curaçao,163423#"+\
"Kiribati,117608#"+\
"Mikronesien,113811#"+\
"Grenada,112002#"+\
"St Vincent und die Grenadinen,110593#"+\
"Aruba,106310#"+\
"Amerikanische Jungferninseln,104579#"+\
"Tonga,104497#"+\
"Seychellen,97741#"+\
"Antigua und Barbuda,97115#"+\
"Ile of Man,84589#"+\
"Andorra,77146#"+\
"Dominica,71808#"+\
"Cayman Islands,64948#"+\
"Bermuda,62508#"+\
"Marshallinseln,58791#"+\
"Nördliche Marianen,57213#"+\
"Grönland,56660#"+\
"Amerikanisch-Samoa,55312#"+\
"St Kitts und Nevis,52834#"+\
"Färöer,48677#"+\
"Sint Maarten,42389#"+\
"Monaco,38967#"+\
"Turks- und Caicosinseln,38194#"+\
"Liechtenstein,38020#"+\
"Saint-Martin,38002#"+\
"San Marino,33864#"+\
"Gibraltar,33706#"+\
"Britische Jungferninseln,30033#"+\
"Bonaire Sint Eustatius und Saba,25983#"+\
"Palau,18001#"+\
"Cookinseln,17547#"+\
"Anguilla,14872#"+\
"Tuvalu,11655#"+\
"Wallis und Futuna,11436#"+\
"Nauru,10764#"+\
"Saint Barthelemy,9853#"+\
"St Helena Ascension und Tristan da Cunha,6061#"+\
"Saint-Pierre und Miquelon,5821#"+\
"Montserrat,4991#"+\
"Falklandinseln,3372#"+\
"Niue,1614#"+\
"Tokelau,1330#"+\
"Vatikanstadt,81#"+\
"Welt,7713468205"
Declare tmp$[],Country$[],Bev$[]
tmp$[]=Explode(b$,"#"):SetSize tmp$[],SizeOf(tmp$[])
WhileLoop 0,SizeOf(tmp$[])-1
Country$[&Loop]=SubStr$(tmp$[&Loop],1,",")
Bev$[&Loop]=SubStr$(tmp$[&Loop],2,",")
EndWhile
'Print "Letzter Eintrag: ",Country$[SizeOf(Country$[])-1], Bev$[SizeOf(Country$[])-1]

Alles anzeigen

p. specht · 30. Oktober 2020, 19:28

... mit diesem TEIL 2 zusammenhängen:

Quellcode

'Q: https://www.laenderdaten.info/lebenserwartung.php#by-population
' Land LEma LEwa GR%% SR%%
VAR z$=\
"Taiwan,80.86,80.86,7.9,7.9#"+\
"Hongkong,82.3,87.7,7.2,6.4#"+\
"Schweiz,81.9,85.7,10.0,7.8#"+\
"Island,81.3,84.5,12.0,6.4#"+\
"Japan,81.3,87.3,7.4,11.0#"+\
"Italien,81.2,85.6,7.3,10.5#"+\
"Macau,81.1,87.1,11.1,3.9#"+\
"Norwegen,81.1,84.5,10.4,7.7#"+\
"Singapur,81.0,85.4,8.8,5.0#"+\
"Schweden,80.9,84.3,11.4,9.1#"+\
"Israel,80.9,84.8,20.8,5.0#"+\
"Spanien,80.7,86.3,7.9,9.1#"+\
"Australien,80.7,84.9,12.6,6.3#"+\
"Irland,80.5,84.1,12.5,6.4#"+\
"Malta,80.4,84.6,9.2,7.6#"+\
"Niederlande,80.3,83.4,9.7,8.9#"+\
"Neuseeland,80.2,83.6,12.0,6.9#"+\
"Luxemburg,80.1,84.6,10.3,7.1#"+\
"Kanada,79.9,84.1,10.1,7.7#"+\
"Südkorea,79.7,85.7,6.4,5.8#"+\
"Frankreich,79.7,85.9,11.3,9.2#"+\
"Vereinigtes Königreich,79.5,83.1,11.0,9.3#"+\
"Belgien,79.4,83.9,10.3,10.7#"+\
"Österreich,79.4,84.1,9.7,9.5#"+\
"Griechenland,79.3,84.4,8.1,11.2#"+\
"Finnland,79.1,84.5,8.6,9.9#"+\
"Dänemark,79.1,82.9,10.6,9.5#"+\
"Katar,79.0,81.9,9.5,1.2#"+\
"Zypern,78.7,82.9,10.5,7.0#"+\
"Deutschland,78.6,83.3,9.5,11.5#"+\
"Slowenien,78.5,84.4,9.4,9.9#"+\
"Portugal,78.3,84.5,8.5,11.0#"+\
"Bermuda,77.9,85.6,8.2,7.5#"+\
"Chile,77.6,82.4,12.4,6.2#"+\
"Costa Rica,77.5,82.7,14.0,5.1#"+\
"Malediven,77.2,80.5,14.2,2.8#"+\
"Vereinigte Arabische Emirate,77.1,79.2,10.3,1.5#"+\
"Libanon,77.1,80.8,17.5,4.4#"+\
"Albanien,76.8,80.2,11.8,7.9#"+\
"Kuba,76.8,80.7,10.2,9.0#"+\
"Puerto Rico,76.3,83.4,6.7,9.2#"+\
"Bahrain,76.3,78.3,14.0,2.4#"+\
"Tschechien,76.2,82.0,10.7,10.6#"+\
"Vereinigte Staaten,76.1,81.1,11.6,8.6#"+\
"Oman,75.9,80.1,19.2,2.4#"+\
"Algerien,75.5,77.9,24.3,4.7#"+\
"Iran,75.4,77.7,18.8,4.8#"+\
"Panama,75.2,81.6,19.0,5.1#"+\
"Marokko,75.2,77.7,18.9,5.1#"+\
"Kroatien,74.9,81.4,9.0,12.9#"+\
"Bosnien und Herzegowina,74.8,79.7,8.1,10.7#"+\
"Kuwait,74.7,76.5,13.9,2.7#"+\
"China,74.5,79.1,10.9,7.1#"+\
"Tunesien,74.5,78.5,17.6,6.3#"+\
"Türkei,74.4,80.3,16.0,5.4#"+\
"Kolumbien,74.3,79.9,14.9,5.6#"+\
"Montenegro,74.3,79.2,11.7,10.7#"+\
"Malaysia,74.1,78.2,16.8,5.1#"+\
"Ecuador,74.1,79.6,19.7,5.1#"+\
"Estland,74.0,82.7,10.9,11.9#"+\
"Uruguay,74.0,81.4,13.9,9.5#"+\
"Slowakei,73.9,80.8,10.6,10.0#"+\
"Peru,73.8,79.3,17.9,5.5#"+\
"Saudi-Arabien,73.8,76.6,17.8,3.5#"+\
"Polen,73.7,81.7,10.2,10.9#"+\
"Nordmazedonien,73.7,77.7,10.8,10.1#"+\
"Serbien,73.5,78.4,9.2,14.6#"+\
"Sri Lanka,73.4,80.1,15.8,6.7#"+\
"Thailand,73.2,80.7,10.3,7.7#"+\
"Argentinien,73.1,79.9,17.0,7.6#"+\
"Jamaika,72.8,76.0,16.1,7.6#"+\
"Honduras,72.8,77.4,21.6,4.4#"+\
"Jordanien,72.7,76.2,22.0,3.9#"+\
"Ungarn,72.7,79.6,9.6,13.4#"+\
"Palästina,72.3,75.6,29.3,3.5#"+\
"Paraguay,72.2,76.3,20.6,5.5#"+\
"Mexiko,72.1,77.8,17.6,6.0#"+\
"Brasilien,72.0,79.4,13.9,6.5#"+\
"Rumänien,71.7,79.2,9.6,13.5#"+\
"Bulgarien,71.5,78.6,8.9,15.4#"+\
"Mauritius,71.3,77.7,10.2,8.5#"+\
"Armenien,71.2,78.4,14.0,9.9#"+\
"Vietnam,71.2,79.4,16.7,6.3#"+\
"Salomonen,71.2,74.7,32.4,4.3#"+\
"Bhutan,71.1,71.8,17.3,6.2#"+\
"Guatemala,71.1,76.9,24.6,4.7#"+\
"Litauen,70.9,80.7,10.0,14.1#"+\
"Dominikanische Republik,70.8,77.2,19.5,6.2#"+\
"Trinidad und Tobago,70.8,76.1,12.9,8.4#"+\
"Nicaragua,70.7,77.8,20.6,5.1#"+\
"Bangladesch,70.6,74.3,18.2,5.5#"+\
"Aserbaidschan,70.3,75.3,14.0,5.8#"+\
"Lettland,70.1,79.7,10.0,15.0#"+\
"Kosovo,70.0,74.5,16.0,7.0#"+\
"Libyen,69.9,75.8,18.8,5.1#"+\
"Ägypten,69.6,74.2,26.4,5.8#"+\
"Usbekistan,69.4,73.7,23.3,4.7#"+\
"Indonesien,69.4,73.7,18.1,6.5#"+\
"Kap Verde,69.3,76.0,19.5,5.6#"+\
"Weißrussland,69.2,79.4,9.9,12.7#"+\
"Georgien,69.2,78.0,13.5,12.8#"+\
"Nepal,69.0,71.9,19.9,6.4#"+\
"Kasachstan,68.8,77.2,21.8,7.1#"+\
"Tadschikistan,68.7,73.2,30.8,4.9#"+\
"Nordkorea,68.4,75.5,13.9,9.1#"+\
"Bolivien,68.4,74.2,21.8,6.8#"+\
"Irak,68.4,72.5,29.1,4.8#"+\
"Venezuela,68.4,76.1,17.9,7.0#"+\
"Suriname,68.4,74.9,18.5,7.3#"+\
"Indien,68.2,70.7,17.9,7.2#"+\
"El Salvador,68.2,77.6,18.3,7.0#"+\
"Russland,67.8,77.8,11.5,12.4#"+\
"Moldawien,67.5,76.1,10.1,11.6#"+\
"Kirgisistan,67.4,75.6,27.1,5.2#"+\
"Kambodscha,67.3,71.6,22.5,6.0#"+\
"Osttimor,67.3,71.4,29.4,6.0#"+\
"Philippinen,67.1,75.4,20.5,5.9#"+\
"Guyana,66.8,73.0,20.0,7.5#"+\
"Ukraine,66.7,76.7,8.7,14.8#"+\
"Syrien,66.6,77.8,23.7,5.4#"+\
"Ruanda,66.5,70.8,31.7,5.2#"+\
"Botswana,66.2,72.0,24.8,5.7#"+\
"Pakistan,66.2,68.1,28.3,6.9#"+\
"Laos,65.8,69.4,23.5,6.4#"+\
"Fidschi,65.6,69.2,21.3,8.2#"+\
"Mongolei,65.6,74.0,24.1,6.3#"+\
"Senegal,65.5,69.6,34.5,5.7#"+\
"Madagaskar,65.1,68.3,32.7,6.1#"+\
"Dschibuti,64.6,68.8,21.5,7.1#"+\
"Turkmenistan,64.6,71.6,23.8,7.0#"+\
"Jemen,64.4,67.8,30.5,6.0#"+\
"Äthiopien,64.4,68.2,32.3,6.6#"+\
"Gabun,64.2,68.3,31.6,6.8#"+\
"Kenia,64.0,68.7,28.7,5.5#"+\
"Eritrea,63.8,68.2,30.3,7.2#"+\
"Myanmar,63.8,69.9,17.6,8.2#"+\
"Sudan,63.3,66.9,32.2,7.2#"+\
"Tansania,63.2,66.8,36.7,6.4#"+\
"Mauretanien,63.1,66.3,33.7,7.2#"+\
"Afghanistan,63.0,66.0,32.5,6.4#"+\
"Papua-Neuguinea,63.0,65.6,27.1,7.4#"+\
"Republik Kongo,62.8,65.7,32.9,6.7#"+\
"Ghana,62.7,64.9,29.4,7.3#"+\
"Komoren,62.4,65.9,31.9,7.2#"+\
"Liberia,62.3,65.1,33.0,7.5#"+\
"Haiti,61.5,65.8,24.3,8.5#"+\
"Niger,60.9,63.2,46.1,8.3#"+\
"Uganda,60.7,65.2,38.1,6.6#"+\
"Malawi,60.7,66.9,34.1,6.6#"+\
"Sambia,60.5,66.4,36.2,6.5#"+\
"Guinea,60.5,61.7,36.4,8.5#"+\
"Südafrika,60.5,67.4,20.5,9.4#"+\
"Gambia,60.4,63.2,38.5,7.9#"+\
"Burkina Faso,60.4,61.9,37.9,8.1#"+\
"Namibia,60.4,66.2,28.6,8.1#"+\
"Benin,59.9,63.0,36.2,8.9#"+\
"Togo,59.9,61.6,33.1,8.4#"+\
"Simbabwe,59.5,62.6,30.7,7.9#"+\
"Burundi,59.4,63.0,39.0,7.9#"+\
"Demokratische Republik Kongo,58.9,61.9,41.2,9.5#"+\
"Mali,58.1,59.6,41.5,9.7#"+\
"Angola,58.1,63.7,40.7,8.2#"+\
"Kamerun,57.7,60.2,35.4,9.3#"+\
"Äquatorialguinea,57.4,59.6,33.2,9.3#"+\
"Mosambik,57.1,63.0,37.5,8.5#"+\
"Elfenbeinküste,56.3,58.7,35.7,10.1#"+\
"Südsudan,56.1,59.1,35.0,10.5#"+\
"Guinea-Bissau,56.0,59.9,35.1,9.6#"+\
"Somalia,55.4,58.8,41.8,10.9#"+\
"Eswatini,55.3,64.0,26.3,9.4#"+\
"Sierra Leone,53.5,55.1,33.4,11.7#"+\
"Nigeria,53.5,55.2,37.9,11.9#"+\
"Tschad,52.6,55.4,42.2,12.1#"+\
"Zentralafrikanische Republik,50.6,55.0,35.3,12.3#"+\
"Lesotho,50.6,57.0,26.8,14.2"
Declare temp$[], Land$[],LEma$[],LEwa$[],GebProm$[],SterbProm$[]
Temp$[]=Explode(z$,"#")
WhileLoop 0,SizeOf(Temp$[])-1
Land$[&Loop]=SubStr$(temp$[&Loop],1,",")
' LEma$[&Loop]=SubStr$(temp$[&Loop],2,",")
' LEwa$[&Loop]=SubStr$(temp$[&Loop],3,",")
' GebProm$[&Loop]=SubStr$(temp$[&Loop],4,",")
SterbProm$[&Loop]=SubStr$(temp$[&Loop],5,",")
EndWhile
'Print "Letzter Eintrag: ", Land$[SizeOf(Land$[])-1], SterbProm$[SizeOf(Land$[])-1] 'debug
'Main TABELLEN-MERGER
Declare i&,j&,flg&
ClearClip
Set("Decimals",2)
WhileLoop 0,SizeOf(Country$[])-1:i&=&Loop
flg&=1
Color 0,15
WhileLoop 0,SizeOf(Land$[])-1:j&=&Loop
If Land$[j&]=Country$[i&]
flg&=0
Case (Land$[j&]="Österreich") Or (Land$[j&]="Deutschland") Or (Land$[j&]="Schweiz"):Color 0,13
Print
Print " ";Land$[j&],Tab(35);Bev$[i&]," ",SterbProm$[j&]+"/k",
Print Format$(" #,0",Val(Bev$[i&])*Val(SterbProm$[j&])/1000)+" p.a.",
Print Format$(" #0",Val(Bev$[i&])*Val(SterbProm$[j&])/1000/12)+"/M ",
Print Format$(" #0",Val(Bev$[i&])*Val(SterbProm$[j&])/1000/52)+"/W ",
Print Tab(100);Val(Bev$[i&])*Val(SterbProm$[j&])/1000/365,"/Tag"
EndIf
:If %csrlin>34:WaitInput:cls:EndIf
EndWhile
Case flg&:PutClip Country$[i&]+", "
EndWhile
Print "\n--ENDE--"
Beep
Print " Gebiete mit fehlenden Geburten- und Sterbdaten siehe Zwischenablage! "
WaitInput
End

Alles anzeigen

p. specht · 31. Oktober 2020, 12:03

KAR-08 da oben ist schon eine härtere Nuss, was?

Oldi-40 · 1. November 2020, 02:34

Hallo,

zu KAR-08:

Wartet mal ab, ich habe jetzt mit Franzbranntwein einen Gurgeltest gemacht. :-D

- Der Franzbranntwein fehlte ja noch in der Aufzählung.

Geht es bei KAR-08 um Brüche/ imaginäre Zahlen oder Wurzeln?

Tschau

p. specht · 1. November 2020, 03:08

Wurzel.
Komplexe Zahlen wären zu schwer für hier!

P.S.: Auch mit Quaternionen oder Matrizem- und Tensorrechnung ist be Rätseln "nicht zu rechnen". :lol:

p. specht · 1. November 2020, 09:04

Hier schon mal das nächste Rätsel:

Abt. KAR-09
========
A / B = 2
A - B = 2
A * B = ?

p. specht · 1. November 2020, 16:04

Abt. Quantenwelt
===========
Wer schon immer mal die Schrödingergleichung kapieren wollte, aber sich nie zu fragen traute: Hier gibt es eine einleuchtende Erklärung (Youtube, engl.)

Lösung zu KAR-08
--------------------

Spoiler anzeigen

Quellcode

Quellcode

Teilen