Дан одномерный массив В(10). Подсчитать количество элементов массива, меньших числа 5. Числа массива ввести с клавиатуры. Составить на языке Паскаль.
Ответ:
05.05.2023 11:57
Чтобы заполнить массив в Паскале элементами, введенными с клавиатуры, можно использовать следующий код:
arduino
Copy code
var
arr: array[1..10] of integer; // объявление массива из 10 элементов
i: integer; // счетчик цикла
begin
for i := 1 to 10 do // цикл по всем элементам массива
begin
write('Введите ', i, '-й элемент массива: '); // выводим приглашение для ввода
readln(arr[i]); // считываем значение с клавиатуры и сохраняем в i-м элементе массива
end;
end.
В данном примере мы объявляем массив arr из 10 целых чисел и заполняем его элементы в цикле for. При каждом проходе цикла выводится приглашение для ввода элемента с процедуры write, а затем считывается значение элемента с клавиатуры и сохраняется в соответствующем элементе массива с функции readln.
Чтобы заполнить массив в Паскале элементами, введенными с клавиатуры, можно использовать следующий код:
arduino
Copy code
var
arr: array[1..10] of integer; // объявление массива из 10 элементов
i: integer; // счетчик цикла
begin
for i := 1 to 10 do // цикл по всем элементам массива
begin
write('Введите ', i, '-й элемент массива: '); // выводим приглашение для ввода
readln(arr[i]); // считываем значение с клавиатуры и сохраняем в i-м элементе массива
end;
end.
В данном примере мы объявляем массив arr из 10 целых чисел и заполняем его элементы в цикле for. При каждом проходе цикла выводится приглашение для ввода элемента с процедуры write, а затем считывается значение элемента с клавиатуры и сохраняется в соответствующем элементе массива с функции readln.