Скачать презентацию
Идет загрузка презентации. Пожалуйста, подождите
1
i := 1, 20 вывод В массиве нет числа X PROGRAM VAR, INTEGER Rand FORTO Example2 ; :=:= i 120DO BEGIN WRITE() : ARRAY [ ] OF i ; BEGIN ; : NumberX ; :=:= WRITELN( Массив случайных чисел : NamberX := 0, X INTEGER RANDOMIZE ; ) Rand [ i ] Random ( 50 ) Rand [ i ] : 4 ; ; READLN() ; END. ; 0 WRITELN ; WRITE() ; Введите X : X NumberX ; FORTO :=:= i 120DO :=:= IFTHEN ELSE Rand [ i ] = X NumberX :=:= NumberX + 1 IF NumberX = 0 THEN WRITELN ( В массиве нет числа, X ) ( Число, X в массиве присутствует, NumberX, раз ) да нет Rand [ i ] = X NamberX := NamberX + 1 да нет NamberX = 0 вывод Число X в массиве присутствует NumberX раз
![i := 1, 20 вывод В массиве нет числа X PROGRAM VAR, INTEGER Rand FORTO Example2 ; :=:= i 120DO BEGIN WRITE() : ARRAY [ 1.. 20 ] OF i ; BEGIN ; : NumberX ; :=:= WRITELN( Массив случайных чисел : NamberX := 0, X INTEGER RANDOMIZE ; ) Rand [ i ] Random](http://images.myshared.ru/19/1200635/slide_1.jpg "i := 1, 20 вывод В массиве нет числа X PROGRAM VAR, INTEGER Rand FORTO Example2 ; :=:= i 120DO BEGIN WRITE() : ARRAY [ 1.. 20 ] OF i ; BEGIN ; : NumberX ; :=:= WRITELN( Массив случайных чисел : NamberX := 0, X INTEGER RANDOMIZE ; ) Rand [ i ] Random")
Еще похожие презентации в нашем архиве:
![PROGRAM example1; const m=100; var a : ARRAY [1.. m] of INTEGER; i,k,n,q : INTEGER; BEGIN readln (n); randomize; WRITELN('Полученный массив:' ); FOR i.](/thumbs/6/682838/big_thumb.jpg "PROGRAM example1; const m=100; var a : ARRAY [1.. m] of INTEGER; i,k,n,q : INTEGER; BEGIN readln (n); randomize; WRITELN('Полученный массив:' ); FOR i.")
![Месяц 010203040506070809101112 T [ 1:12 ]T [1]T [2]T [3]T [4]T [5]T [6]T [7]T [8]T [9]T [10]T [11]T [12] Температура-21-18-7-610182324176-7-18 начало конец.](/thumbs/19/1192892/big_thumb.jpg "Месяц 010203040506070809101112 T [ 1:12 ]T [1]T [2]T [3]T [4]T [5]T [6]T [7]T [8]T [9]T [10]T [11]T [12] Температура-21-18-7-610182324176-7-18 начало конец.")
![Упорядоченный набор данных одного типа называется массивом. Каждый элемент массива описывается в общем виде как A[i], где A – имя массива, i – номер элемента.](/thumbs/5/524040/big_thumb.jpg "Упорядоченный набор данных одного типа называется массивом. Каждый элемент массива описывается в общем виде как A[i], где A – имя массива, i – номер элемента.")
![Месяц 010203040506070809101112 Среднее T [ 1:12 ]T [1]T [2]T [3]T [4]T [5]T [6]T [7]T [8]T [9]T [10]T [11]T [12] Температура -21-18-7-610182324176-7-18.](/thumbs/19/1185211/big_thumb.jpg "Месяц 010203040506070809101112 Среднее T [ 1:12 ]T [1]T [2]T [3]T [4]T [5]T [6]T [7]T [8]T [9]T [10]T [11]T [12] Температура -21-18-7-610182324176-7-18.")
![Шутилина Л.А., Lshutilina@yandex.ru. A[1,1]A[1,2]A[1,3]A[1,4]A[1,5] A[2,1]A[2,2]A[2,3]A[2,4]A[2,5] A[3,1]A[3,2]A[3,3]A[3,4]A[3,5] A[4,1]A[4,2]A[4,3]A[4,4]A[4,5]](/thumbs/6/723134/big_thumb.jpg "Шутилина Л.А., Lshutilina@yandex.ru. A[1,1]A[1,2]A[1,3]A[1,4]A[1,5] A[2,1]A[2,2]A[2,3]A[2,4]A[2,5] A[3,1]A[3,2]A[3,3]A[3,4]A[3,5] A[4,1]A[4,2]A[4,3]A[4,4]A[4,5]")
![13.04.10 const n=10; var a:array[1..n] of integer; i,j,c,b,k:integer; begin randomize; for i:=1 to n do begin a[i]:=random(11)-5;write(a[i]:5) end;writeln;](/thumbs/6/690437/big_thumb.jpg "13.04.10 const n=10; var a:array[1..n] of integer; i,j,c,b,k:integer; begin randomize; for i:=1 to n do begin a[i]:=random(11)-5;write(a[i]:5) end;writeln;")
![Проверка пройденного материала. Исправьте ошибки в решении задачи: заполнить и вывести массив W(3) вещественных чисел Program Mass; Var b:Array[1..10]](/thumbs/4/258608/big_thumb.jpg "Проверка пройденного материала. Исправьте ошибки в решении задачи: заполнить и вывести массив W(3) вещественных чисел Program Mass; Var b:Array[1..10]")
