Ответы на вопрос:
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
Популярно: Информатика
-
kirill88527.04.2021 03:26
-
JakaJaka0723.07.2020 01:25
-
саша547921.05.2020 19:31
-
Кашмамининагений06.08.2021 23:38
-
AdelinaAries19.02.2020 05:38
-
tural2308.07.2021 15:29
-
цветок8207.11.2022 19:02
-
ElliDi1112.03.2023 10:05
-
карольчик130.11.2022 18:52
-
vitlikkushnirp08qv413.09.2022 17:03