Информатика | 10 - 11 классы
Pascal.
Дана последовательность чисел .
Вывести на экран суммы положительных и отрицательных чисел данной последовательности.
С клавиатуры ввели 10 чисел положительных и отрицательных?
С клавиатуры ввели 10 чисел положительных и отрицательных.
Необходимо вывести на экран сумму всех положительных чисел.
Дан массив положительных и отрицательных чисел?
Дан массив положительных и отрицательных чисел.
Вывести количество положительных и отрицательных чисел, стоящих на нечетных местах.
Срочно!
Дана последовательность из М чисел?
Дана последовательность из М чисел.
Подсчитать, сколько в ней отрицательных, положительных и нулевых элементов на basic.
Дана непустая последовательность положительный целых чисел, за которой следует 0?
Дана непустая последовательность положительный целых чисел, за которой следует 0.
Найти сумму всех четных чисел этой последовательности
Записать, как программу в паскале.
Решите задачу в Паскале?
Решите задачу в Паскале.
Если можно с блок - схемой.
Дана последовательность чисел.
Вывести на экран все отрицательные числа.
Дан массив из 50 чисел?
Дан массив из 50 чисел.
Заполните его случайными числами.
Вывести на экран сначала все положительные его элементы, а затем все отрицательные.
Дана последовательность чисел?
Дана последовательность чисел.
Найти произведение всех четных отрицательных чисел.
Выводится на экран последовательность 20 случайных чисел из промежутка [ - 10, 10]?
Выводится на экран последовательность 20 случайных чисел из промежутка [ - 10, 10].
Определить количество отрицательных чисел больших - 5 в данной последовательности.
Вводится последовательность ненулевых чисел?
Вводится последовательность ненулевых чисел.
0 - конец последовательности.
Подсчитать, сколько в ней отрицательных чисел, и сумму положительных чисел.
Дана последовательность чисел, заканчивающаяся нулем?
Дана последовательность чисел, заканчивающаяся нулем.
Найти сумму отрицательных и произведение положительных чисел.
Напишите в паскале.
На странице вопроса Pascal? из категории Информатика вы найдете ответ для уровня учащихся 10 - 11 классов. Если полученный ответ не устраивает и нужно расшить круг поиска, используйте удобную поисковую систему сайта. Можно также ознакомиться с похожими вопросами и ответами других пользователей в этой же категории или создать новый вопрос. Возможно, вам будет полезной информация, оставленная пользователями в комментариях, где можно обсудить тему с помощью обратной связи.
/ / Pascal ABC.
NET 3.
1 сборка 1219
Const
n = 10 ;
Begin
var ar : = ReadArrInteger(n) ;
writeln('Сумма положительных = ', ar.
Where(x - > ; x> ; 0).
Sum) ;
writeln('Сумма сумма отрицательных = ', ar.
Where(x - > ; x< ; 0).
Sum) ;
end.
Пример ввода :
1 - 2
3
4 - 5 - 6
7
8
9
10
Пример вывода :
Сумма положительных = 42
Сумма сумма отрицательных = - 13.