27.12.2011, 19:47 | #1 (permalink) |
Новичок
Регистрация: 26.12.2011
Сообщений: 1
Сказал(а) спасибо: 0
Поблагодарили 0 раз(а) в 0 сообщениях
Репутация: 10
|
Блок-схема в Qbasic
задача: Вычислить среднее геометрическое положительных элементов мас-сива F(n), найденное среднее геометрическое записать в массив F как n + 1 элемент. решение: CLS DIM S(10) FOR I = 1 TO 10 S(I) = 1 + INT (1000*RND) N = SQR (S(1)*S(2)*S(3)*S(4)*S(5)*S(6)*S(7)*S(8)*(9)) NEXT DIM F (11) X = SQR (S(1)*S(2)*S(3)*S(4)*S(5)*S(6)*S(7)*S(8)*S(9)*S(10 )) PRINT X, N END |
27.12.2011, 19:47 | |
Helpmaster
Member
Регистрация: 08.03.2016
Сообщений: 0
|
У нас нашлись схожие топики Блок-схема. Паскаль Блок-схема для готовой задачи Нужна блок-схема Блок-схема к программе |
Ads | |
Member
Регистрация: 31.10.2006
Сообщений: 40200
Записей в дневнике: 0
Сказал(а) спасибо: 0
Поблагодарили 0 раз(а) в 0 сообщениях
Репутация: 55070
|
|
|