Задачи на программирование на языке QBasic

@Casha512 · Регистрация: 03.02.2017

Студворк — интернет-сервис помощи студентам

Здравствуйте дорогие форумчане

Помогите пожалуйста с решением задач:

1) Дан массив А(5). Найти сумму и количество положительных элементов.
2) Составьте алгоритм и программу вычисления значений функции на произвольном отрезке с произвольным шагом:
y = x - x2 - при -2 < x <= 2;
y = x2 - sin(3,14 x) - в остальных случаях.

echs · 03.02.2017, 16:40

Casha512
на форуме есть правило Одна задача - Одна тема
(Сколько задач - столько тем и создаётся)

1)

QBasic/QuickBASIC

CLS
RANDOMIZE TIMER
DIM A(1 TO 5) AS INTEGER
 
FOR i = 1 TO 5
   A(i) = 40 * RND - 20
   PRINT A(i);
NEXT
PRINT : PRINT
 
FOR i = 1 TO 5
   sum = sum + A(i)
   IF A(i) > 0 THEN kol = kol + 1
NEXT
PRINT "SUMMA ="; sum
PRINT "KOLICH. ="; kol
END

@Casha512 · 03.02.2017, 17:33 **[ТС]**

Спасибо, буду знать про правило)

@кот Бегемот · 03.02.2017, 17:38

Сообщение от Casha512

Найти сумму и количество положительных элементов.

echs, Вы считаете общую сумму, а речь идёт о положительных элементах

echs · 03.02.2017, 18:41

Casha512
я тут ошибку сделал. Исправьте строку 12 на

QBasic/QuickBASIC

1	IF A(i) > 0 THEN sum = sum + A(i)

@Casha512 0 / 0 / 0 Регистрация: 03.02.2017 Сообщений: 3
		1
	Задачи на программирование на языке QBasic 03.02.2017, 15:55. Показов 775. Ответов 4 Метки нет (Все метки) Здравствуйте дорогие форумчане Помогите пожалуйста с решением задач: 1) Дан массив А(5). Найти сумму и количество положительных элементов. 2) Составьте алгоритм и программу вычисления значений функции на произвольном отрезке с произвольным шагом: y = x - x2 - при -2 < x <= 2; y = x2 - sin(3,14 x) - в остальных случаях. 0

@Casha512 0 / 0 / 0 Регистрация: 03.02.2017 Сообщений: 3
	03.02.2017, 17:33 [ТС]	3
	Спасибо, буду знать про правило) 0

@кот Бегемот Платежеспособный зверь 8861 / 4291 / 1629 Регистрация: 28.10.2009 Сообщений: 11,452
	03.02.2017, 17:38	4
	Сообщение от Casha512 Найти сумму и количество положительных элементов. echs, Вы считаете общую сумму, а речь идёт о положительных элементах 1

	03.02.2017, 18:41

Опции темы