Информатика | 5 - 9 классы
Даю все баллы!
Найти сумму отрицательных чисел в паскале.
Программа в Паскале нужна, пожалуйста?
Программа в Паскале нужна, пожалуйста!
Даю 60 баллов!
С клавиатуры вводится последовательность из N чисел, положительных и отрицательных.
Какая сумма чисел по модулю больше, положительных или отрицательных?
ПАСКАЛЬ?
ПАСКАЛЬ!
Найти величину наибольшего из отрицательных чисел последовательности из 100 целых чисел.
Ввести массив из 30 производных чисел и найти сумму всех отрицательных(паскаль)?
Ввести массив из 30 производных чисел и найти сумму всех отрицательных(паскаль).
Найти сумму отрицательных слагаемых суммы sin2 + sin3 + ?
Найти сумму отрицательных слагаемых суммы sin2 + sin3 + .
+ sinM.
Паскаль.
Дан ряд чисел от n1 до n2?
Дан ряд чисел от n1 до n2.
Посчитать в паскале сумму отрицательных чисел в этом ряду.
Найти сумму всех отрицательных чисел однородно массива?
Найти сумму всех отрицательных чисел однородно массива.
Массив вводится с клавиатуры.
Паскаль авс.
Дана последовательность чисел, заканчивающаяся нулем?
Дана последовательность чисел, заканчивающаяся нулем.
Найти сумму отрицательных и произведение положительных чисел.
Напишите в паскале.
Найти сумму двух чисел в паскале?
Найти сумму двух чисел в паскале.
Определить минимум из 3 введенных чисел?
Определить минимум из 3 введенных чисел.
Если минимум отрицательное число, то найти сумму трех чисел, а иначе найти их произведение
В паскале.
Ввести с клавиатуры n - любых чисел , найти количество отрицательных чисел( Паскаль )?
Ввести с клавиатуры n - любых чисел , найти количество отрицательных чисел( Паскаль ).
На этой странице находится вопрос Даю все баллы?. Здесь же – ответы на него, и похожие вопросы в категории Информатика, которые можно найти с помощью простой в использовании поисковой системы. Уровень сложности вопроса соответствует уровню подготовки учащихся 5 - 9 классов. В комментариях, оставленных ниже, ознакомьтесь с вариантами ответов посетителей страницы. С ними можно обсудить тему вопроса в режиме on-line. Если ни один из предложенных ответов не устраивает, сформулируйте новый вопрос в поисковой строке, расположенной вверху, и нажмите кнопку.
Uses crt ;
var a : array [1.
100] of integer ; s, n, i : integer ;
begin readln(n) ; for i : = 1 to n do readln(a[i]) ;
s : = 0 ;
clrscr ;
for i : = 1 to n do
if A[i].