Способы ввода значений в массив на Паскале 1) Заполнение массива с клавиатуры а) program massiv_1; const n=5; vari: integer; a: array[1..n] of integer;

Презентация:



Advertisements
Похожие презентации
Массивы в Паскале. Создание массива: var a:array [1..5] of integer; i:integer; begin for i:=1 to 5 do begin write ('a[',i,']='); readln(a[i]); end; end.
Advertisements

Месяц Среднее 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] Температура
Дан массив. Найти максимальный и минимальный элементы массива и поменять их местами. Выполнение программы Выполнение программы.
PROGRAM example1; const m=100; var a : ARRAY [1.. m] of INTEGER; i,k,n,q : INTEGER; BEGIN readln (n); randomize; WRITELN('Полученный массив:' ); FOR i.
Program Summa; {Суммирование элементов в 1м массиве} Uses Crt; Type Massiv = Array [1..100] of Real; Var A : Massiv; i, N : Integer; S : Real; Begin Write('Введите.
Упорядоченный набор данных одного типа называется массивом. Каждый элемент массива описывается в общем виде как A[i], где A – имя массива, i – номер элемента.
Одномерные массивы Введение. I.Описание Массив – это фиксированное кол - во элементов одного и того же типа, объединенных одним именем, каждый элемент.
9.Задана целочисленная матрица. Вывести N чисел - максимальные значения элементов для каждой строки, где N - количество строк матрицы
Одномерный массив Turbo Pascal 9 класс. Объясните каждый шаг в программе. Что делает программа? Сколько раз срабатывает цикл? Var A : array [1..10] of.
5.Дана матрица А и вектор Х соответствующих размерностей. Нечетные строки матрицы заменить элементами вектора Х. Результаты работы: n=4 m=
3. Дана прямоугольная матрица, элементами которой являются целые числа. Поменять местами ее строки следующим образом: первую строку с последней, вторую.
Массив – совокупность конечного числа данных одного типа.
ПРИМЕРЫ РЕШЕНИЯ ЗАДАЧ С ОДНОМЕРНЫМИ МАССИВАМИ. ЗАДАЧА: Вычислить сумму элементов массива program summa(input,output); var I:integer; T:array[1..5] of.
Решение задач с использованием массивов
Работа с одномерными массивами Урок информатики 9 кл.
Тема: Нахождение минимального и максимального элемента в массиве.
PROGRAM example1; {сдвинуть циклически элементы массива вправо} const m=10; var a : ARRAY [1.. m] of INTEGER; i,k,n: INTEGER; BEGIN randomize; n:=m; WRITELN('Полученный.
Козлова О.Б., МБОУ СОШ 199, Новосибирск Двухмерные массивы.
Тема: «Понятие массива. Назначение. Тип. Размер. Размерность. Одномерный массив» :56:36.
Месяц 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] Температура начало конец.
Транксрипт:

Способы ввода значений в массив на Паскале 1) Заполнение массива с клавиатуры а) program massiv_1; const n=5; vari: integer; a: array[1..n] of integer; begin writeln('Введите массив из ', n, ' элементов'); for i:=1 to n do read(a[i]); writeln('Вывод элементов массива'); for i:=1 to n do write(a [i]:4); end.

Способы ввода значений в массив на Паскале Заполнение массива случайными числами из диапазона [a,b]. program massiv_random; const n=5; var i,a,b:integer; t:array[1..n] of integer; begin randomize; writeln('Введите диапазон случайных чисел'); readln(a,b); for i:=1 to n do t[i]:=random(b-a)+a; writeln('Вывод элементов массива'); for i:=1 to n do write(t[i]:4); end.

Вычисление среднегодовой температуры program Temperature; Var T: array[1..7] of real; i: integer; Tsred: real; begin for i:=1 to 7 do begin Write( 'T[, i : 2, ']= ); Readln(T[i]) end; Tsred:=0; for i:=1 to 7 do Tsred:=Tsred+T[i]; Tsred:=Tsred/7; Writeln('Средняя температура=', Tsred:6:2, ' градусов') end.