profile
Опубликовано 5 лет назад по предмету Информатика от Blondinchik59

посчитать количество отрицательных чисел среди чисел m,n,p

  1. Ответ
    Ответ дан petyaGavrikov
    var m,n,p,k:integer;
    begin
    writeln('Введите 3 числа:');
    readln(m,n,p);
    k:=0;
    if m<0 then k:=k+1;
    if n<0 then k:=k+1;
    if p<0 then k:=k+1;
    writeln('k=',k);
    end.

    Пример:
    Введите 3 числа:
    12 -7 31 
    k=1
    1. Ответ
      Ответ дан Blondinchik59
      Большое спасибо)
    2. Ответ
      Ответ дан petyaGavrikov
      Пожалуйста
    3. Ответ
      Ответ дан Blondinchik59
      не поможете еще с одним заданием?)