СРОЧНО ПОМОГИТЕ ПЛЗ Составьте любой массив и из массива выведите только отрицательные числа.ответ отмечу как лучшый помогите на завтра надо
5-9 класс
|
ну блин
давай возьмем 10 чисел в вод программы
к примеру 1 15 228 -10 16 8 10 18 9 10
я все помечу в программе как все делается
var
a : array [1..100] of longint {я поставил массив a одномерным и массив этот в ограничении от 1 до 100, если надо больше просто поставь не 100, а какое хочешь число (если паскаль, максимальное число 9999}
i,n : longint;
begin
readln(n) {помечаю n как количество вводимых чисел}
for i:=1 to n do readln(a[i]); {ввожу числа от 1 до n в столбик из-за окончания ln}
for i:=1 to n do {пишем массив опять и проверяем введенные числа}
if a[i]<0 then writeln(a[i]); {проверяем числа с номерами от 1 до n и если число строго меньше 0 то выводим}
end.
все программа готова, ты можешь взять любое число n и взять любые числа, кстати если ничего не найдет, то ничего не выведет
Другие вопросы из категории
Работа с Паскалем.
Найти минимальное и максимальное значение из четных чисел и записать их в файл output.txt
договорились использовать специальные цветные сигнальные ракеты, запускаемые
последовательно. Одна последовательность ракет – один сигнал; в каком порядке
идут цвета – существенно. Какое количество различных сигналов можно передать
при помощи запуска ровно трёх таких сигнальных ракет, если в запасе имеются
ракеты трёх различных цветов (ракет каждого вида неограниченное количество,
цвет ракет в последовательности может повторяться)?
перейдет в тот класс, который в этом году закончит Петя. В каком классе учится каждый из мальчиков?
1
1 2 3 4 =1
1 2 3 4 5 =1
1 2 3 4 5 6 =1
1 2 3 4 5 6 7 =1
1 2 3 4 5 6 7 8 =1
Читайте также
Ввести с клавиатуры массив А из 5 элементов, найти минимальное из них
2. Создать массив A из 10 элементов, заполненный случайным образом числами принадлежащих промежутку (0;20). Вывести полученный массив на экран. Вычислить количество элементов массива, значения которых не превышают среднее арифметическое значений его элементов.
от -100 до 100. Определить минимальное положительное число.
2) Дан массив, состоящий из 10 чисел. Найдите номера тех элементовв масива, которые наименее различаются.
Найти сумму элементов данного массива.
2. Заполнить одномерный массив, состоящий из 10 элементов, случайными числами от-15 до 35.
Найти значение максимального элемента массива.
перевести Робота из Б в А с закрашиванием тех же клеток? помогите пожалуйста!