Задать вопрос
29 сентября, 20:43

Последовательно вводят 5 целых чисел. Найти количество отрицательных

+5
Ответы (1)
  1. 29 сентября, 23:08
    0
    Var a, k, i:integer;

    begin;

    for i:=1 to 5 do

    begin;

    readln (a) ;

    if a<0 then inc (k) ;

    end;

    writeln (k) ;

    end.
Знаете ответ?
Сомневаетесь в ответе?
Найдите правильный ответ на вопрос ✅ «Последовательно вводят 5 целых чисел. Найти количество отрицательных ...» по предмету 📘 Информатика, а если вы сомневаетесь в правильности ответов или ответ отсутствует, то попробуйте воспользоваться умным поиском на сайте и найти ответы на похожие вопросы.
Смотреть другие ответы
Похожие вопросы по информатике
помогите решить задачю по информатике С клавиатуры последовательно вводят целые числа и высчитывается их сумма если с клавиатуры вводят 0, то больше числа не вводят. Найти сумму всех введеных чисел.
Ответы (1)
1. Даны два целых числа A и B (A < B). Найти сумму всех чисел от A до B включительно. 2. Даны два целых числа A и B (A 0). Найти произведение всех чисел от A до B включительно. 3. Дан массив целых чисел Х. Найти сумму квадратов всех чисел. 4.
Ответы (1)
Помогите решить задачи по информатике в паскале 1. с клавиатуры вводят числа. признак окончания ввода чисел число 0. вычислить сумму положительных и отрицательных чисел 2.
Ответы (2)
Последовательно вводят N целых чисел. Найти произведение чисел больших 8 и меньших 15
Ответы (1)
1. Разработать программу алгоритма для подсчета количества отрицательных чисел среди целых чисел a, b, c. Протестировать алгоритм для всех возможных случаев (когда количество отрицательных чисел равно 0, 1, 2 и 3). 2.
Ответы (1)