Блог для маленьких школьников и их родителей
ШколаЛа

СРОЧНО. СОСТАВИТЬ ПРОГРАММУ Определить количество и сумму отрицательных из 10 веденых случайным образом…

Автор:
Предмет: Информатика
Уровень: 5 - 9 класс

СРОЧНО.
СОСТАВИТЬ ПРОГРАММУ
Определить количество и сумму отрицательных из 10 веденых случайным образом чисел

Ответов к вопросу: 1
  • jaysones01
    25.09.2024 | 12:01

    Ответ:
    1

    2

    3

    4

    5

    6

    7

    8

    9

    10

    11

    12

    13

    14

    15

    16

    program Project1;

    const n=10;

    var i,sum:integer;

    A:array [1.n] of integer;

    begin

     for i:=1 to n do begin

      write(‘введите A[‘,i,’]’); readln (A[i]);

     end;

      writeln;

      sum:=0;

     for i:=1 to n do

      if A[i]<0 then begin

        writeln (‘A[‘,i,’]’); sum:=sum+A[i];

      end;

     writeln (‘Сумма отрицательных элементов =’,sum);

    end.

    Объяснение:

Ответить на вопрос:
:p :-p 8) 8-) :lol: =( :( :-( :8 ;) ;-) :(( :o:
Нажимая на кнопку я даю согласие на обработку персональных данных и принимаю политику конфиденциальности.