Язык qbasic ! решите , используя цикл while-wend 1. написать программу, вычисляющую сумму и среднее арифметическое последовательности положительных чисел, которые вводятся с клавиатуры. 2. написать программу, которая определяет максимальное число из введенной с клавиатуры последовательности положительных чисел (длина последовательности неограниченна).
xezi1
3
17.05.2019 12:10
2
Другие вопросы по теме Информатика
vinnikdanil
11.04.2020 19:38
liza1439
11.04.2020 19:39
pourkur1111oz10kt
27.11.2021 12:01
polinka2002761
27.11.2021 12:07
Лаки2005
27.11.2021 12:07
1venera4
04.04.2019 16:48
Ruki2233
01.07.2019 23:50
Sofa9091
14.05.2020 12:45
Популярные вопросы
- Основа АD трапеції АВСD лежить в площині β точки В і С не лежить у цій площині....
3 - В одном множестве 28 элемент(ов,-а), а в другом 170. Какое макстимальное...
2 - . Даны точки А(1, 2, 3) и В(-7, -2, 4). Определите расстояние между точками...
1 - Выполни почленное сложение числовых равенств: 2,4:3+0,2=1 и 5×0,2-2 2,4:3+0,2+___=5×0,2-2+___...
3 - Причина засушливости климата внутри материка и повышенной влажности восточного...
3 - Реши задачу и запиши ответ Павел решил встретиться с другом Виктором, который...
3 - 1.какой закон используется в устройстве гидравлических машин ? А)Закон всемирного...
2 - Найдите все значения параметра а, при которых сумма квадратов корней трехчлена...
1 - В каком году Темучин провозглашен всемонгольским ханом?...
3 - В годы Независимости в Казахстане начали функционировать несколько партий....
3
'Первая задача
CLS
SCREEN 12
INPUT "N"; N
DIM A(N)
FOR I = 1 TO N
INPUT A(I)
NEXT
SUM = 0
FOR I = 1 TO N
SUM = SUM + A(I)
NEXT
SREDNEE = SUM / N
PRINT SUM
PRINT SREDNEE
'Вторая задача
CLS
SCREEN 12
INPUT "N"; N
DIM A(N)
FOR I = 1 TO N
INPUT A(I)
NEXT
MAX = 0
FOR I = 1 TO N
IF A(I) > MAX THEN MAX = A(I)
NEXT
PRINT MAX