// PascalABC.NET 3.1, сборка 1250 от 28.05.2016 begin var a:=-1.32; var b:=1.49; var h:=0.11; var y1:=-14.0; var y2:=17.0; var k:=0; var x:=a; while x<=b do begin var y:=Tan(x); if (y>=y1) and (y<=y2) then begin Writeln('x=',x:5:2,' y=',y:7:4); Inc(k) end; x+=h end; Writeln('Найдено значений: ',k) end.
№| Название | Место расположения | Площадь, км2 1 Каспийское море |самое большое на Земле озеро, бессточное, расположенное на стыке Европы и Азии| 371 000 км² 2 Верхнее | Одно их больших озер Северной Америки |82 103 км² 3 Виктория | озеро в Восточной Африке, на территории Танзании, Кении и Уганды. Расположено в тектоническом прогибе | 68 800 км² 4 Гурон |озеро в США и Канаде | 59 600 км² 5 Мичиган |пресноводное озеро в США| 58 000 км² 6 Аральское море | бывшее бессточное соленое озеро в средней Азии| 3 300 км² 7 Танганьика | крупное озеро в Центральной Африке| 32 900 км² 8 Байкал |озеро тектонического происхождения в южной части Восточной Сибири| 31 722 км² 9 Большое Медвежье |находится на севере Канады| 31 153 км² 10 Нуаза | Озеро (Нуаза) Малави - самое южное из так называемых Великих африканских озер Восточно-Африканской рифтовой зоны| 6 400км²
