Лучшие помощники
- Megamozg 2205 б
- Matalya1 1800 б
- DevAdmin 1720 б
- arkasha_bortnikov 900 б
- Dwayne_Johnson 865 б
20 апреля 2023 19:37
288
Дан одномерный массив вывести на экран числа больше 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
Остались вопросы?
Еще вопросы по категории Математика
Тело брошено вертикально вверх со скоростью 15 м/с. Какую скорость будет иметь тело при возвращении в точку броска? Помогите плиз...
расстояние которой автобус двигаются со скоростью 75 км ч проезжает за 8 часов легковой автомобиль проезжает за 6 часов Найдите скорость легкового авт...
Как перевести 11 дм в см?...
Вынося общий множитель за скобки, найдите значение выражения: Г) 261×12+29×101+60×12-17×101 5-класс помогите пожалуйста дам 10 баллов...
Вычисли площадь закрашенного сектора, если радиус круга равен 10 см и центральный угол FOE = 72° Ответ: Sсектора= _____ п см^2...