ПИТОН 1. Что надо написать вместо многоточия, чтобы вывести элементы массива X из N элементов в обратном порядке? for k in range(N): print ( ... ) 2. Массив A состоит из N элементов. Какой оператор надо вставить вместо многоточия, чтобы вывести на экран все элементы массива A с четными номерами? k = 0 while k < N: print ( A[k] ) ... 3. Задан массив X из N элементов. Какой оператор надо поставить вместо многоточия, чтобы найти сумму всех элементов массива в переменной S? S = 0 for k in range(N): ... 4. Задан массив X из N элементов. Какое условие надо поставить вместо многоточия, чтобы найти сумму положительных элементов массива в переменной S? S = 0 for k in range(N): if ... : S += X[k]

1

x[-k - 1]

2

k += 2

3

S += x[k]

4

x[k] > 0

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

"Говорильный" аппарат,
Модный гаджет,связи рад.
Фото,видео снимает,
На звонки он отвечает.
                                ( Телефон)

К празднику, всегда "накрыт",
Полон явств и каждый сыт,
Я бюро и секретер,
Есть компьютерный размер.
                                 ( Стол)

Важных данных я хранитель,
Информации носитель,
Гибкая,так что же это?
Я магнитная ?(Дискета)

Я блокнот и память я,
Есть и электронная.
Записи я все веду,
Всё фиксирую и жду.
                         (Записная книжка)

Не пищу и не шуршу,
А с компьютером-дружу.
Я курсором управляю,
И командам
                        (Мышка)

Осенью,я всех встречаю.
Летом,просто отдыхаю.
Весь учебный год-учу,
Дарить знания хочу.
                          (Школа)