Массивы в языке Pascal. (Урок 42)

– письменно (стр. 74). Быть готовым к тесту

Домашнее задание

в памяти рядом.

Особенности:
все элементы имеют один тип
весь массив имеет одно имя
все элементы расположены в памяти рядом

Примеры:
список учеников в классе
квартиры в доме
школы в городе
данные о температуре воздуха за год

массива: 20

индексов выбирается от любого значения до любого, но не меньшего!

индексов
Массив целых чисел:
var A: array[1.. ] of integer;

const N=5;

N

var A : array[ 1 .. 5 ] of integer ;

Размер массива только через константы (явные или именованные):

имя

начальный индекс

конечный индекс

тип
элементов

Y: array [1..10] of real;
D: array [-5..13] of word;
Z: array [1..50] of string[20];
B: array [a..k] of integer;

[5..1] of real;
...
A[5] := 4.5;

var a: array [0..9] of integer;
...
A[10] := 'x';

проблемы. Объявлен массив. Ввести в него все числа из устройства ввода.

const K=50;
var a:array[1..K] of real;

var a:array[1..50] of real;

или так, что то же самое!

Объявлен массив

of real;

или так, что то же самое!

write('Количество чисел? ');
readln(N);
for i:=1 to N do begin
write('a[', i, ']=');
readln( a[i] )
end;

a[1] =
a[2] =
a[3] =
a[4] =
a[5] =

5
12
34
56
13

Постановка проблемы. Описан массив. Ввести все его элементы

to N do
writeln('a[',i,']=',a[i]);

a[1]=25
a[2]=144
a[3]=1316
a[4]=3466
a[5]=169

Постановка проблемы. Описан массив. Значения элементам присвоены. Вывести N его элементов на экран

Можно в строку через пробел

Массив A:
25 144 1316 3466 169

writeln('Массив A:');
for i:=1 to N do
write(a[i]),' ');

а затем выводит эти числа.

Протестировать при учителе программу. Исходный текст программы оставить на рабочем столе. Имя файла:
M1<до 6 букв фамилии>.PAS
Например: M1LAZARE.PAS

Дан массив. Значения элементам присвоены. Увеличить каждый элемент массива в 3 раза.

//Утроить числа
for i:=1 to N do
a[i]:=a[i]*3;

var a:array[1..50] of real;

или так, что то же самое!

Объявлен массив