Лучшие помощники
- Megamozg 2205 б
- Matalya1 1800 б
- DevAdmin 1720 б
- arkasha_bortnikov 900 б
- Dwayne_Johnson 870 б
20 апреля 2023 19:37
323
Дан одномерный массив вывести на экран числа больше 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
Остались вопросы?
Еще вопросы по категории Математика
Чему равно количество минут в 6 часах?...
Сроочнооо! Во дворе школы растут всего три дерева:берёза,клён ,дуб.Берёза выше клёна на 5 метров,но ниже дуба на 10 метров.Выберите верные утверждения...
Корень четвертой степени из 0,0001 минус корень пятой степени из 1024...
Какое число нужно подставить вместо "х" в задании "10х 8 0", чтобы результат был равен 70?...
Каков результат выражения 10 минус 6 плюс 4?...