Предмет: Информатика, автор: erik5555

Выведите на экран в строку сумму всех четных чисел первой сотни. Помогите Visual Basic 6.0

Ответы

Автор ответа: z31rus
0
а на экран это куда? на форму? в текстовое поле? MessageBox? я не совсем понял

вот код формы, результат пишется на ней же

Private Sub Form_Activate()
For i = 2 To 100 Step 2
summ = summ + i
Next i
Print summ
End Sub
Похожие вопросы
Предмет: Русский язык, автор: Аноним
Спишите, графически обоснуйте постановку или отсутствие запятой перед союзом и.

Screenshot_47.png

Потом она пошла домой и посадила ячменное зернышко в цветочный горшок. («Дюймовочка»)
В тот же миг Снежная королева подхватила его, и они взвились на черное облако. («Снежная королева»)
Утенок узнал этих прекрасных птиц, и его охватила какая-то непонятная грусть. («Гадкий утенок»)
Наконец настал день свадьбы, и крот пришел за невестой. («Дюймовочка»)
Напротив императорского трона поставили золотой шест, и на самой верхушке его сидел соловей. («Соловей»)
Рано утром она отправилась дальше и вдруг встретила старушку с корзинкой ягод. («Дикие лебеди»)


Задание 2.

Спишите, расставьте знаки препинания. Угадайте сказки Андерсена.

Среди комнаты стоял золотой сундук а на сундуке сидело настоящее страшилище.
Лебедь положил свою голову ей на колени и она гладила и перебирала его перышки.
Всю зиму прожила ласточка в подземелье а Дюймовочка ухаживала за ней.
Бедное животное забрыкалось а девочка захохотала и потащила Герду к постели.
Он объехал весь свет но так и не нашел себе невесты.
Предмет: Алгебра, автор: vinarvahitov