Что озночают эти строки (Паскаль): const n = 8; Type is = array [1..n] of integer; var a : is; begin
10-11 класс
|
...
end.
const n = 8; // задается константа n равная 8
Type is = array [1..n] of integer; { объявляется тип is которому будет соответствовать массив из n элементов типа integer в данном случае элементов будет 8}
var a : is; {объявляем перменную а типа is, соответственно это будет целочисленный массив из n элементов}
begin
...
end.
1) const n=8 - константа, n нельзя будет присвоить другие значения
2) Type is = array [1..n] of integer; это тип с названием "is" он равен массиву
Другие вопросы из категории
Читайте также
Помогите найти, где я ошибся, ибо сам не смог этого сделать!
program udalenie;
const
n=20;
Type
Tarray=array[1..n] of integer;
var i,s,j:integer;
a:Tarray;
begin
randomize;
for i:=1 to n do begin
a [i]:=random(100);
write(a[i]:3, ' ' );
end;
s:=0;
for i:=1 to n do
begin
if (a[i] mod 3=0) or (a[i] mod 5=0) then
begin
s:=s+1;
for j:=i to n-s do
a[i]:=a[i+1];
a[n+1-s]:=0;
end
end;
write('dsd');
for i:=1 to n-s do
write(a[i]:3, ' ' );
end.
var i: integer;
begin for i:=1 to 10 do
begin
mas1[i]:=random(n);
Write(mas1[i]:3);
end;
end.
var i: integer;
begin for i:=1 to 10 do
begin
mas1[i]:=random(n);
Write(mas1[i]:3);
end;
end.
Дан целочисленный массив из 30 элементов. Элементы массива могут принимать значение от -1000 до 1000.Гарантируется, что последний элемент массива отличен от нуля.
Приведите фрагмент программы вместо ... на языке Паскаль.
const N=30;
var
a: array [1..N] of integer;
i, x, y: integer;
s: real;
begin
for i;=1 to N do readln(a[i]);
.......
end.
ниже скрин задания.
русском языке или на одном из языков программирования алгоритм, который находит и выводит наименьший номер элемента, равного X, или сообщение, что такого элемента нет.
const N=30;
var a: array [1..N] of integer;
i, j, x: integer;