Презентация «Программирование на Basic»
Смотреть слайды в полном размере 
Вы можете ознакомиться с презентацией онлайн, просмотреть текст и слайды к ней, а также, в случае, если она вам подходит - скачать файл для редактирования или печати. Документ содержит 29 слайдов и доступен в формате ppt. Размер файла: 490.00 KB
Pic.1
Программирование на Basic Массивы
Pic.2
Pic.3
Массивом называется упорядоченная совокупность однородных величин, обозначенных каждая одним и тем же именем с различными целочисленными индексами, изменяющимися по порядку. Массивом называется …
Pic.4
Pic.5
Pic.6
Pic.7
Pic.8
Pic.9
Pic.10
Pic.11
Pic.12
Pic.13
Pic.14
1. Подсчитайте произведение элементов массива. INPUT “размер массива”;N DIM S(N) P=1 FOR i=1 ТО N S(i) = INT(RND(1)*10) P=P*S(i) NEXT i PRINT “Массив” FOR i=1 ТО N PRINT S(i); NEXT I PRINT …
Pic.15
2. Вычислите значения функции Y=X*X для X=2,4,6,8,. . . ,36 и разместите их в одномерном массиве Y. DIM Y(18) FOR x=2 ТО 36 STEP 2 i=x/2 Y(i) = X*X NEXT x PRINT “Массив” FOR i=1 ТО 18 PRINT Y(i); …
Pic.16
3. Измените порядок значений элементов массива на обратный.
Pic.17
4. "Сожмите" числовой массив, выбросив из него отрицательные числа. INPUT “размер массива”; N DIM A(N) K=0 FOR i=1 TO N PRINT “введите”;i;“элемент массива” INPUT A(i) IF A(i)<0 THEN …
Pic.18
5. Задан массив и некоторое число. Найти, на каком месте расположено число в массиве. INPUT “число”;C INPUT “размер массива”; N DIM A(N) PRINT “массив” FOR i=1 TO N A(i)=INT(RND(1)*100) IF A(i)=C …
Pic.19
6. Напечатайте первую сотню простых чисел. DIM A(100)
Pic.20
7. Поверните квадратный массив на 90, 180, 270 градусов по часовой стрелке.
Pic.21
8. Выясните, есть ли одинаковые числа в одномерном массиве, в двумерном массиве.
Pic.22
9. Подсчитайте количество уникальных чисел в массиве.
Pic.23
10. Задан массив чисел. Замените каждое число суммой предыдущих: а) включая заменяемое; б) исключая заменяемое.
Pic.24
14. Определить y, если x=x1,x2,x3. . . x10: y=2*x2-4*x+sin2x DIM X(10),Y(10) FOR i=1 TO 10 X(i)=INT(RND(1)*10) Y(i)=2*X(i)^2-4*X(i)+SIN(X(i))^2 ?X(i);Y(i) NEXT i END
Pic.25
17. Составить программу замены отрицательных элементов таблицы их квадратами. INPUT N,M DIM A(N,M) FOR i=1 TO N FOR j=1 TO M A(i,j)=INT(RND(1)*10)*(-1)^(INT(RND(1)*10) ?A(i,j); IF A(i,j)<0 THEN …
Pic.26
18. Написать программу удвоения каждого элемента одномерного массива. INPUT “размер массива”; N DIM A(N) PRINT “массив”; “удвоенный массив” FOR i=1 TO N A(i)=INT(RND(1)*100) PRINT A(i),A(i)*2 NEXT i
Pic.27
22. Написать программу для определения сколько раз число 10 встречается среди элементов одномерного массива. INPUT “размер массива”; N DIM A(N) K=0 FOR i=1 TO N A(i)=INT(RND(1)*100) IF A(i)=10 THEN …
Pic.28
24. Найти наименьший элемент одномерного массива. INPUT N DIM A(N) FOR i=1 TO N A(i)=INT(RND(1)*10) NEXT i K=1 MIN=A(1) FOR i=2 TO N IF A(i)<MIN THEN MIN=A(i) : K=i NEXT i ? “Массив” FOR i=1 TO N …
Pic.29
Если вам понравился сайт и размещенные на нем материалы, пожалуйста, не забывайте поделиться этой страничкой в социальных сетях и с друзьями! Спасибо!
