Например,
var
A: array[1..4] of integer;
Обращение к любому элементу массива происходит по его номеру.
В оглавление
T: array [1..30] of real;
T[4]:=4;
TEMP: array [1..7] of integer;
SP: array [1..5] of string;
BEGIN
TEMP[1]:=10;
TEMP[2]:=12;
TEMP[3]:=8;
TEMP[4]:=10;
TEMP[5]:=9;
TEMP[6]:=8;
TEMP[7]:=8;
BEGIN
SP[1]:=‘Аксенов’;
SP[2]:=‘Бобров’;
SP[3]:=‘Веснин’;
SP[4]:=‘Гончаров’;
SP[5]:=‘Давыдов’;
BEGIN
for i:=1 to 7 do
begin
write(‘Введите ‘,i,’температуру ‘);
readln(TEMP[i]);
end;
BEGIN
for i:=1 to 5 do
begin
write(‘Введите ‘,i,’ученика ‘);
readln(SP[i]);
end;
RANDOM(N) – вещественное число из [0,N);
TRUNC(RANDOM(N))- целое число из [0,N)
TRUNC(RANDOM(N)+1)– целое число из [0,N]
TRUNC(RANDOM(B-A)+A)– целое число из [A,B)
Показ программы
BEGIN
for i:=1 to 7 do
begin
TEMP [i]:= trunc(random(10));
end;
For i:=1 to 7 do
begin
writeln(TEMP[i]);
end;
Если не удалось найти и скачать доклад-презентацию, Вы можете заказать его на нашем сайте. Мы постараемся найти нужный Вам материал и отправим по электронной почте. Не стесняйтесь обращаться к нам, если у вас возникли вопросы или пожелания:
Email: Нажмите что бы посмотреть