• Разработать блок-схему и программу, которая запрашивает массив из N целых чисел, выводит номера отрицательных элементов и сами эти элементы)

    Вот эти числа:
    а) 3,5,-2,3,-2,0,-6,-8,1;
    б)-1,-2,-3,-4,0,-1,2,3)

Ответы 1

  • 1) Программа для Pascal ABC:

    program massiv;uses CRT;vara:array [1..200] of integer;sum,i,n,d:integer;beginwriteln('vvedite kolitestvo chisel massiva (N)');readln(n);randomize;clrscr;for i:=1 to n dobegina[i]:=random(100000);writeln(a[i])end;for i:=1 to n dobegind:=a[i] mod 7;if d=0 thensum:=sum+a[i]end;writeln('summa chisel kratnix 7 = ',sum)end.

  • Добавить свой ответ

Еще вопросы

Войти через Google

или

Забыли пароль?

У меня нет аккаунта, я хочу Зарегистрироваться

How much to ban the user?
1 hour 1 day 100 years