tutotveti.ru
Предметы
Биология
Українська мова
Музыка
Французский язык
Физика
МХК
Обществознание
Психология
ОБЖ
Право
Беларуская мова
Литература
Химия
Українська література
Экономика
Немецкий язык
География
Информатика
Қазақ тiлi
Геометрия
Английский язык
Русский язык
Окружающий мир
Алгебра
История
Другие предметы
Видео-ответы
ПОИСК
Войти
Регистрация
Информатика
Впаскаль(цикл) последовательно
Впаскаль(цикл) последовательно вводится n целых чисел.найти количество отрицательных среди них
raymondbaby
2 27.05.2019 12:10
0
Ответы
daniilgurnyy
24.06.2020 12:38
Var m:array[1..30] of longint;
schet1,i:longint;
begin
for i:=1 to 30 do
begin
read(m[i]);
if m[i]<0 then
inc(schet1);
end;
writeln(schet1);
end.
ПОКАЗАТЬ ОТВЕТЫ
nastya3162
24.06.2020 12:38
ответ: если я не ошибаюсь, это N деленное на 2
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика
deva70
12.11.2020 12:53
1. Дано число n в восьмеричной системе счисления. Разработать машину Тьюринга, которая увеличивала бы заданное число n на 1. Автомат в состоянии q1 обозревает некую цифру входного...
андрев1
12.11.2020 12:52
3. Указать характеристическое свойство множества С\Д, если С – множество прямоугольниковД – множество квадратов...
fedor1daniil12
12.11.2020 12:51
Выберите порядок выполнения арифметических действий в формулах в табличном процессоре А * /; ^; +, - Б * /; +, -; ^ В +, -; ^; * / Г ^; * /; +, -...
барынмай
12.11.2020 12:50
Какой минимальный объём памяти (в Мбайт) нужно зарезервировать, чтобы можно было сохранить любое растровое изображение размером 4096 х 2048 пикселов при условии, что в изображении...
Lizka647dhsn
12.11.2020 12:50
с заданием по информатике ПЛАЧУ 1. Установите для документа следующие поля: верхнее – 2 см, нижнее – 1,5 см, левое – 1,5 см, правое – 1,5 см. 2. Напечатайте текст (шрифт – Times...
notix55
12.11.2020 12:50
. Соотнесите номер кнопки с ее названием: 1) а) цвет текста 2) б) подчеркнутый 3) в) шрифт 4) г) цвет выделения текста 5) д) курсив 6) е) размер шрифта 7) ж) полужирный...
vail12
12.11.2020 12:42
Нужно решить информатика 9 класс...
человек416
12.11.2020 12:40
Какие числа приговаривает кот при выполнении програмного кода? ...
Nikbatyr
12.11.2020 12:40
Напишите логические функции и таблицу истинности...
tanusik32
12.11.2020 12:39
Які властивості має графічний примітив в векторному зображенні? * Розмір Роздільність Форма колір та товщина лінії контуру б заливки внутрішньої області кількість кольорів...
Популярные вопросы
Як відносилися батьки Джона Лівінгстона до його захоплення?...
3
17.We aren t the (bad) team in our city 18. What s the (dangerous) place on Earth?...
3
Решите если можете то на тетради умаляю...
3
Солнеч..ный(2) закат в горах уд..вительно хорош..(4).(синтаксический разбор)...
3
Укажите падеж выделенного или ни существительного: а) винительный падеж б) родительный...
1
Определите основную мысль произведения Кладовая Солнца A)Век живи-век учись....
1
за с заданием Надеюсь ответы будут нормальные и хотя бы немного развернутые...
2
БАЛА ДАЮ У паралелограмі ABCD ∠А=α, а ∠В=β. Укажіть формулу, яка виражає залежність...
1
3-жаттығу. Жұмбақ өлеңді көшіріп жаз.Саған жақын бір адам,Үш әріптен тұрады.Оқысаң...
3
пдддддддддддддддддддддддддддджжжжжжжжжжжжжжжжжжжжж...
1
schet1,i:longint;
begin
for i:=1 to 30 do
begin
read(m[i]);
if m[i]<0 then
inc(schet1);
end;
writeln(schet1);
end.