Вопрос: В каком массиве больше элементов?

A:array[1..100;1..9] of real;

b:array[1..1000] of integer;

c:array[1..10;1..10,1..8] of string;

d:array[1..700] of char;

A

B

C

D

Вопрос: Задан массив 5,4,12,3,9,0,-3,2,5,8. Как этот массив

Может быть объявлен?

A:array[1..10] of real;

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

A:array[1..10] of string;

A:array[1..10] of char;

Вопрос: Задан массив 12; 12,3; 34; 12; 10; 12; 11; 0; 1. Как этот массив может быть объявлен?

A:array[1..10] of real;

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

A:array[1..10] of string;

A:array[1..10] of char;

Вопрос: Задан массив 5,4,12,3,9,0,-3,2,5,8. Как этот массив

Может быть объявлен?

A:array[1..10] of real;

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

A:array[1..10] of byte;

A:array[1..10] of char;

Вопрос: Укажите правильно заданный (заданные) массив(ы).

A:array of [1..100] real;

array B[1..10] of integer;

A:array[1..10] of byte;

A:array[10..1] of char;

Вопрос: Дан фрагмент программы. Есть ли в нем ошибка?

K:=0; for I:=1 to 100 do k:=k+i;

да

нет

не знаю

Вопрос: Дан фрагмент программы. Есть ли в нем ошибка?

K:=100; for I:=1 to K do write('privet');

да

нет

не знаю

Вопрос: Дан фрагмент программы. Есть ли в нем ошибка?

for I:=1 to 100 do write('privet');

да

нет

не знаю

Вопрос: Дан фрагмент программы. Есть ли в нем ошибка?

Const K:=100; for I:=1000 downto K do write('privet');

да

нет

не знаю

Вопрос: Дан фрагмент программы. Какого типа может быть индекс цикла?

For I:=1 to 20 do write('I like Pascal');

integer

real

byte

char

Вопрос: Что делает данный фрагмент программы?

For I:=1 to 10 do for j:=1 to 10 do A[i,j]:=0;

элемент массива A[i,j] приравнивается к нулю

проверяет, есть ли в массиве A ненулевые элементы

все элементы массива A обнуляются