Ввод и вывод элементов массива

Дата: 2025-06-02; Просмотры: 9

Оценка:

0.00 из 5.00 — оценок

Скачиваний: 0

Скачать

27 апреля группа № 13 (Информатика и ИКТ)

Урок № 65

Тема программы: Работа с массивами

Тема урока: Правила организации ввода и вывода значений массива.

Цель: рассмотреть правила организации ввода и вывода значений массива, научиться решать задачи.

ПЛАН

1. Проработка теоретического материала

2. Решение примеров

3. Написание конспекта

Теоретический материал

Ввод и вывод элементов массива

1. Процедуры ввода

Read <список ввода>;

или Readln <список ввода>;

Различие в выполнении процедур заключается в том, что процедура Readln включает переход на новую строку по окончании ввода. Использование Readln без параметров обеспечивает переход к новой строке. Список ввода - представляет собой перечисленные через запятую имена переменных, которые в результате ввода получают определенные значения.
Список ввода - представляет собой перечисленные через запятую имена переменных, которые в результате ввода получают определенные значения.

Пример: С процедурой ввода связана стандартная функция Eoln, значение которой имеет тип boolean:

Пример:

Var K,I:

integer;

...

Readln; I:=0;

while not Eoln do

{осуществляется ввод целых значений K и подсчитывается количество чисел до достижения конца строки}

begin

Read(K);

I:=I+1

end;

2. Процедуры вывода

Write (<список вывода>);

или Writeln (<список вывода>);

Различие в выполнении процедур заключается в том, что процедура Writeln по окончании вывода обеспечивает переход на новую строку. Использование Writeln без параметров обеспечивает переход на новую строку. Список вывода представляет собой перечисленные через запятую имена переменных, функций или выражения, значения которых выводятся на устройства вывода.

Допускается бесформатный и форматный вывод:

1) Бесформатный вывод

При использовании бесформатного вывода данные выводятся на устройства вывода в форматах, обусловленных в среде Turbo-Pascal 7.0 системой умолчаний и типом данных.

Пример:

var A,B: real;

I,N: integer;

C: char;

...

I:=0; N:=I+1;

A:=0.25; B:=Sqrt(A); C:=’#’;

Writeln(I,’ ‘,N); { 0 1}

Writeln(A,B); { 2.5000000000E-01 5.0000000000E-01}

Writeln(A,Sqrt(A)); { 2.5000000000E-01 5.0000000000E-01}

Writeln(N+5,C); { 6#}

Write(MaxInt);{32767-максимальное число типа integer}

2) Форматный вывод

одномерный массив строка ввод

При использовании форматного вывода каждый элемент списка может быть представлен в одной из следующих форм:

A:w

где A - элемент списка вывода;

w - целое положительное число, определяющее общую длину поля вывода;

d - целое положительное число, определяющее длину дробной части выводимого вещественного числа.

Пример:

var A,B: real;

I,N: integer;

C: char;

...

I:=0; N:=I+1; A:=0.25; B:=Sqrt(A); C:=’#’;

Writeln(A:5:2,B:6:2); { 0.25 0.50}

Writeln(‘I=’,I:4); {I= 0}

Writeln(C:4); { #}

Writeln(‘B=’,Sqrt(A):6:2); {B= 0.50}

Writeln(‘***************’); {***************}

Writeln(‘*A=’,A:4:2,’*B=’,B:4:2,’*’);{*A=0.25*B=0.50*}

Writeln(‘***************’); {***************}

3. Описание одномерных массивов

Массив - совокупность конечного числа данных одного типа, объединенных общим именем. 0.1, 0.5, 0.7, ..., 1.9 12, 34, 56, ..., 13

A[I], B[J] - элементы массива,

где I, J - индексы, указывающие номер или место данного элемента в массиве.

4. Ввод-вывод одномерных массивов

Var <имя массива>: array[<диапазон изменения индекса>] of <тип элементов>;

Размерность массива может быть любой, элементы массива могут быть любого, в том числе и структурированного типа, индекс может быть любого ординального типа, кроме типа Longint. Пример:
Var A: array [1..4] of real;Type MAS1=array[1..4] of real;

B: array [1..3] of integer;MAS2=array[1..3] of integer;

Var A: MAS1;

B: MAS2;

или

Type I1=1..4;

I2=1..3;

MAS1=array[I1] of real;

MAS2=array[I2] of integer;

Var A:

MAS1;

B: MAS2;

Решение задач

Задание 1. Составьте программу, в которой массив заполняется случайными целыми числами в диапазоне от 0 до 20.

program primer1;

var

a:array[1..10] of integer;

i:integer;

begin

writeln ('Полученный массив:');

for i:=1 to 10 do

begin

a[i]:=random(21);

write (a[i],' ');

end;

end.

Задание 2. Составьте программу заполнения массива a[1..10] следующими числами:

program primer3;

var

a:array[1..10] of integer;

i:integer;

begin

for i:=1 to 10 do

a[i]:=i*2;

writeln ('Полученный массив:');

for i:=1 to 10 do

write (a[i],' ');

end.

Домашнее задание: Повторить § 24. Выполнить задания

Задание 3. Составьте программу, в которой массив заполняется случайными целыми числами в диапазоне от – 3 до 20.

Задание 4. Составьте программу заполнения массива a[1..10] следующими числами:

Информационные источники (основные учебники по предмету)

Информатика. Базовый уровень: учебник для 10 класса / Семакин И. Г., Хеннер Е. К., Т.Ю. Шеина.- 5-е изд. — М.: БИНОМ. Лаборатория знаний, 2015. —264 с.

Ресурсы сети Интернет

https://www.bibliofond.ru/view.aspx?id=447302

https://docplayer.ru/42429804-6-vvod-i-vyvod-elementov-massiva.html

Решения

Задание 3. Составьте программу, в которой массив заполняется случайными целыми числами в диапазоне от – 3 до 20.

program primer2;

var

a:array[1..10] of integer;

i:integer;

begin

writeln ('Полученный массив:');

for i:=1 to 10 do

begin

a[i]:=random(21)-3;

write (a[i],' ');

end;

end.

Задание 4. Составьте программу заполнения массива a[1..10] следующими числами:

program primer4;

var

a:array[1..10] of integer;

i:integer;

begin

for i:=1 to 10 do

a[i]:=i*2+1;

writeln ('Полученный массив:');

for i:=1 to 10 do

write (a[i],' ');

end.