program LessThanNine;
Var
A, B : Array of Integer;
I, Kolvo : Integer;
begin
randomize;
SetLength(A,11);
SetLength(B,11);
Kolvo := 0;
For I:=0 to 10 do
begin
A[I]:=random(16);
Write(A[I], ' ');
end;
Writeln;
For I:=0 to 10 do
begin
B[I]:=A[I] * 2;
Write(B[I], ' ');
end;
Writeln;
For I:=0 to 10 do
if B[I]<9 then
Kolvo := Kolvo + 1;
Write('Количество элементов меньше 9-ти: ', Kolvo);
end.
Объяснение:
Ну надеюсь не докопаются до того, что тут вывод на экран происходит в том же цикле, что и присваивание значений всем элементам
Паскаль не чувствителен к регистру, это значит, что переменные myvariable и MyVariable - эквивалентны. Однако для лучшей читабельности кода, необходимо использовать Camel Case и Pascal Case нотации.
PascalCase - это стиль написания имен, при котором составные слова названия идентификатора пишутся слитно, и каждое новое слово начинается с большой буквы. Пример: MyVar, MyBestProgramm, WorkArray.
Паскаль нотация используется для названий классов, публичных полей данных и констант, а также именования процедур и функций.
CamelCase (верблюжья нотация) - этот стиль повторяет правило для предыдущей нотации, только начинается с маленькой буквы. Пример: firstElement, myField, btnRun.
Нотация используется для локальных переменных и констант.