Лучшие помощники
- Megamozg 2190 б
- Matalya1 1800 б
- DevAdmin 1690 б
- arkasha_bortnikov 860 б
- Dwayne_Johnson 845 б
20 апреля 2023 19:37
216
Дан одномерный массив вывести на экран числа больше 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
Остались вопросы?
Еще вопросы по категории Математика
Что дано в задании?...
Какие действия необходимо выполнить по заданию '1 tga tgb'?...
Для покупки 8 воздушных шариков у Тани не хватит 2 руб. Если она купит 5 шариков,то у неё останется10 руб.Сколько денег было у Тани?...
Какое число является результатом умножения 4 на 15?...
Напишите уравнение касательной к графику функции 𝑦 = 4𝑥2 + 3, проходящей через точку: a. (0; 0); b. (0; -1); c. (2;3)....
Все предметы