ответ:Семь чудес Казахстана. Первое чудо Казахстана это наскальные изображения урочища Тамгалы. Их обнаружила экспедиция Института истории в 1957 году. Второе чудо Казахстана это Золотой человек. Уже сама находка Золотого человека произвела фурор в научном мире. Третье чудо Казахстана является домбра. Во время раскопок города Койкырылган около Арала нашли скульптуру глиняного человека с домброй в руках, датируемый третьим-четвёртым веком до н.э. Четвёртое чудо это подземные мечети Мангыстау. Находятся в труднодоступных местах полупустынной зоны Мангистау. Климат здесь жёсткий-жгучее солнце,песчаные бури, что и заставило древних жителей полуострова искать уединения в скалах. Мавзолей Ходжи Ахмета Яссауи. Построенный в городе Туркестане в 1396-1399 годы по приказу эмира Тимура персидскими мастерами, мавзолей является храмом-шедевром центральноазиатского зодчества, собравшим в себе архитектурные наследия веков. В июне 2003 года мавзолей Ходжи Ахмета Яссауи внесён в список Мирового наследия ЮНЕСКО. Юрта. С древних времён юрта практически не претерпела серьёзных изменений. Байтерек. Комплекс Астана-Байтерек сооружён по образцу эскиз-проекта президента Казахстана Нурсултана Назарбаева под влиянием казахской народной сказки о богатыре Ер-Тостике.
Объяснение:Надеюсь написала то что нужно..
Задача 1:
Dim angle_one, angle_two, angle_three As Integer
Console.Write("Введите первый угол треугольника: ")
angle_one = Console.ReadLine
Console.Write("Введите второй угол треугольника: ")
angle_two = Console.ReadLine
angle_three = 180 - angle_one - angle_two
If angle_one = 90 Or angle_two = 90 Or angle_three = 90 Then Console.WriteLine("Треугольник прямоугольный.")
If angle_one > 90 Or angle_two > 90 Or angle_three > 90 Then Console.WriteLine("Треугольник тупоугольный.")
If angle_one < 90 And angle_two < 90 And angle_three < 90 Then Console.WriteLine("Треугольник остроугольный.")
Console.ReadKey()
Задача 2:
Dim n, sum As Integer
n = Console.ReadLine
For i = 1 To n
sum += i ^ 2
Next
Console.WriteLine("Сумма квадратов от 1 до " & n & " равна " & sum)
Console.ReadKey()