Сделать упражнение в тетрадь. Красное выделение -выучить. В тетрадь все задания
№1 Дан Массив A: 13, -24 ,4,
3, -5, 10,
0. Правильная запись A[1]=13
Заполните
по примеру,
A[2]= , A[ ]=10, A
4, A[5] -5, [7] =
№2 Чему равен
элемент, имеющий индекс 2 и какой индекс имеет значение 4
4
-2
4
-7
3
2
1
2
3
4
5
6
5
-55
4
-2
0
1
2
3
4
5
Описание элементов массива Var a: array[1..10] of integer;
№4 Описать массив F, состоящий из 7 элементов вещественного типа
№5Описать массив D, который состоит из 8 элементов целого типа
№6 Придумать пример описания массива
Выучить Ввод элементов массива А For i:=1 to 5 do readln (a[i]);
№7 Напишите Ввод 7 элементов массива S
№8 Напишите Ввод 5 элементов массива R
* №9 Ввод элементов массива Ас запросом на ввод( по желанию)
For i:=1 to 5 do begin write(‘введите a[‘,i, ‘]‘);readln (a[i]);end;
Напишите Ввод 8 элементов массива Z с запросом на ввод
Вывод 5 элем. массива А через ‘,‘ и через ‘;‘
For i:=1 to 5 do write(a[i] , ‘,‘);
For i:=1 to 5 do write(a[i] , ‘;‘);
№10 Напишите Вывод 6 элементов массива D через запятую
Выучить
- Преобразование элементов
массива
(увеличение
элементов массива, уменьшение, возведение в степень, приравнивание к конкретному
значению)
|
Структура программы элементов
массива на преобразование |
||
1 |
Описание массива А
5 целых элементов |
Var a: array[1..5] of integer; |
|
2 |
Ввод элементов массива цикл |
For i:=1 to 5 do readln (a[i]); |
|
3 |
Обработка
элементов массива цикл |
For i:=1 to 5 do <команды> |
|
4 |
Вывод элементов массива цикл |
For i:=1 to 5 do write(a[i] , ‘;‘); |
|
| |||
|
Преобразование всех элементов массива.
Пример, разобранный на уроке
Дан массив A из 8 целых элементов каждый
увеличить на 2 и вывести через 4 позиции
program m14;
var A: array[1..8] of integer;
i
: integer ; { описание переменных }
begin
for I := 1
to 5 do read (a[i]); { заполнение массива c клавиатуры}
for i:=1 to 5 do A[i]:= A[i] +2; {Увел каждого элемента массива на 2}
For i:=1 to
5 do write(a[i]:4 ); { вывод всех чисел через 4 позиции}
End.
а
Комментариев нет:
Отправить комментарий