Вопросы для размышления 1. На какие виды подразделяются инструменты программы SketchUp? 2. Какие инструменты имеются на панели рисования и каковы их функции? 3. Какие инструменты относятся к группе инструментов моди- фикации? 4. Для чего предназначен инструмент Тяни/толкай? 5. Какова функция инструмента Окружность? 6. Какие правила необходимо соблюдать при работе с программой SketchUp?

1. Консольное приложение:

Module Module1

    Sub Main()
        Dim n, i, s As Integer
        Console.Write("Введите число N")
        n = Console.ReadLine
        s = 0
        For i = 1 To n
            s = s + i * i
        Next
        Console.Write(s)
        n = Val(Console.ReadLine)

    End Sub

End Module

2. Приложение Windows Forms:
На форме 3 объекта:
TextBox1 - для ввода N
Textbox2 - для вывода суммы квадратов
Button1 - чтобы запустить процесс вычислений

Public Class Form1

    Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
        Dim i, s As Integer
        s = 0
        For i = 1 To Val(TextBox1.Text)
            s = s + i * i
        Next
        TextBox2.Text = s
    End Sub
End Class