Лучшие помощники
- Megamozg 2205 б
- Matalya1 1800 б
- DevAdmin 1720 б
- arkasha_bortnikov 900 б
- Dwayne_Johnson 870 б
20 апреля 2023 19:37
350
Дан одномерный массив вывести на экран числа больше 5.(Pascal)
1
ответ
Пример кода на Pascal:
```
program PrintArray;
var
arr: array[1..10] of integer; // объявляем массив из 10 элементов
i: integer;
begin
// заполняем массив случайными числами от 1 до 10
for i := 1 to 10 do
arr[i] := random(10) + 1;
// выводим на экран числа больше 5
for i := 1 to 10 do
if arr[i] > 5 then
writeln(arr[i]);
readln;
end.
```
В данном примере мы объявляем массив `arr` из 10 элементов и заполняем его случайными числами от 1 до 10. Затем мы проходим по всем элементам массива и выводим на экран только те числа, которые больше 5.
```
program PrintArray;
var
arr: array[1..10] of integer; // объявляем массив из 10 элементов
i: integer;
begin
// заполняем массив случайными числами от 1 до 10
for i := 1 to 10 do
arr[i] := random(10) + 1;
// выводим на экран числа больше 5
for i := 1 to 10 do
if arr[i] > 5 then
writeln(arr[i]);
readln;
end.
```
В данном примере мы объявляем массив `arr` из 10 элементов и заполняем его случайными числами от 1 до 10. Затем мы проходим по всем элементам массива и выводим на экран только те числа, которые больше 5.
0
·
Хороший ответ
20 апреля 2023 19:39
Остались вопросы?
Еще вопросы по категории Математика
Все цифры в записи 8‑значных натуральных чисел a и b — нечетные, а в записи любого числа между ними есть четная цифра. Найдите наибольшее возможное зн...
Расставь числа от 5 до 9 в пустые кружки так, чтобы соблюдалось правило:красная стрелка направлена от большого к меньшему,а синяя наоборот...
Зрительный зал имеет 360 мест. Сколько осталось свободных мест после того, как 8 групп по 42 человека в каждой заняли свои места?...
4/5 8/25 1/4 3/50 17/20 представьте в виде десятичной дроби...
Какие слова в русском языке имеют непроизносимую согласную?...