Ответы на вопрос:
public class form1 private sub button1_click(sender as object, e as eventargs) handles button1.click randomize() textbox1.text = "" dim n as integer = 10 dim array(n) as integer dim summa, number as integer dim i as integer summa = 0 number = 0 for i = 1 to n step 1 array(i) = int((100 * + 1) textbox1.text = textbox1.text & array(i) & " " if array(i) mod 2 = 0 then summa = summa + array(i) number = number + 1 end if next i label1.text = "сумма всех положитеьных чисел равна " & summa & ". и количество их равно " & number end subend class
Популярно: Информатика
-
denbabichev9602.03.2021 22:17
-
Fallens0n04.06.2021 15:18
-
НатальяДубкова23.05.2020 17:23
-
Kiber04ек24.05.2020 07:29
-
kise197008.02.2021 04:39
-
kassaalevtina06.01.2020 07:44
-
dasha194921.11.2022 18:10
-
ZeD31510.04.2023 14:56
-
kamuxa07.06.2021 05:47
-
chunya2004105.06.2023 15:19