Лучшие помощники
- Megamozg 2180 б
- Matalya1 1800 б
- DevAdmin 1690 б
- arkasha_bortnikov 840 б
- Dwayne_Johnson 840 б
20 апреля 2023 19:37
208
Дан одномерный массив вывести на экран числа больше 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
Остались вопросы?
Еще вопросы по категории Математика
А)рулон обоев длиной 10,5 м разрезали на 8 равных частей. Найдите длину каждой части, округлив результат до сотых. Сколько примерно метров и сантиметр...
Какие еще примеры можно привести для выражения '1 к ...'?...
Постройте на координатной плоскости четырехугольник ABCD , если A ( -10 . - 2 ) ; B ( -2 , -2 ) ; C ( -2 . - 6 ) ; D ( -10 : -6 ) . Является ли он пря...
Какое выражение равно 50?...
Какие из перечисленных фразеологизмов вы знаете?...
Все предметы