60

Разработать блок-схему и программу…

ivanushka1980 16 апреля 2023

Разработать блок-схему и программу, которая запрашивает массив из N целых чисел, выводит номера отрицательных элементов и сами этиэлементы) Вот эти числа: а) 3,5,-2,3,-2,0,-6,-8,1; б) -1,-2,-3,-4,0,-1,2,3)

категория: информатика

88

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.

пользователи выбрали этот ответ лучшим

Знаете другой ответ?
Другие вопросы по информатике

ПОПУЛЯРНОЕ
Есть интересный вопрос? Задайте его нашему сообществу, у нас наверняка найдется ответ!
Делитесь опытом и знаниями, зарабатывайте награды и репутацию, заводите новых интересных друзей!
Задавайте интересные вопросы, давайте качественные ответы и зарабатывайте деньги. Подробнее...