tutotveti.ru
Предметы
Биология
Українська мова
Музыка
Французский язык
Физика
МХК
Обществознание
Психология
ОБЖ
Право
Беларуская мова
Литература
Химия
Українська література
Экономика
Немецкий язык
География
Информатика
Қазақ тiлi
Геометрия
Английский язык
Русский язык
Окружающий мир
Алгебра
История
Другие предметы
Видео-ответы
ПОИСК
Войти
Регистрация
Информатика
Дан массив из 20 элементов вводиться
Дан массив из 20 элементов вводиться с клавиатуры , подсчитать количество отрицательных элементов
Женьочки
1 06.06.2019 20:50
3
Ответы
Aly6000
01.10.2020 21:00
Var
i,n:integer;
a:array[1..20]of integer;
begin
for i:=1 to 20 do
begin
readln(a[i]);
if a[i]<0 then n:=n+1
end;
writeln('ответ: ',n)
end.
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика
zaylera34
04.02.2021 16:55
Изучи предложенный рисунок и определи папку в которой будет сохранён скачанный файл...
alekseislepsov2008
28.04.2021 10:14
Составить блок-схему и написать программу на языке Паскаль, используя оператор цикла с условием «ПОКА», вычисления суммы ряда: S=1/2+1/4+1/6+1/8…+1/N...
Kikookiko
28.04.2021 10:14
: Для того, щоб повторно не вказувати модуль при використанні функцій використовують конструкцію (напишіть маленькими англійськими літерами) :...
Ксеньд0ль
28.04.2021 10:15
Определите значение переменных s и i после выполнения фрагмента программы...
nekish21
28.04.2021 10:16
Які переваги дає застосування каскадних таблиць стилів? 1Скорочення html коду2одноманітність оформлення багатьох сторінці сайту3можливість створення таблиць більш складної структури,...
lesheboker0228
28.04.2021 10:16
Выберите основные разделы Вкладки Ссылки , текстовогоредактора WS WordВерных ответов: 2ИллюстрацииСсылки и списки литературыРасстановка переносовОглавления, Сноски ...
SlavaKirja
28.04.2021 10:16
Выполните ручную трассировку( составить таблицу расчетов) и определить результаты выполнения алгоритма....
Natasha183038
31.01.2022 04:36
2. Известна длина окружности. Найти площадь круга, ограниченного этой окружностью. НУЖНО СДЕЛАТЬ В ПИТОНЕ...
ksyushay02
31.01.2022 04:36
Який буде результат виконання наведеного коду програми print (27%4)?...
0773
31.01.2022 04:34
Дана сторона квадрата a. Найти его площадь S = a 2 . (в программе а2 пишите вот так а**2)...
Популярные вопросы
Какие растения и каких животных охраняют в вашем крае,области? красноярск...
2
Сколько существует шестиразрядных двоичных чисел, содержащих не более трех единиц?...
1
Постройте специальный вопрос к членам предложения к подлежащему: 1. he visited mary...
1
Пример существительных которые имеют форму ед.числа и мн.ч...
3
На каких дистанциях в легкой атлетике используется низкий старт? (1) бег на 100...
1
Вмагазин 36 кг груш а яблок в 4 раза меньше а мандаринов столько сколько груш и...
3
Определите количество вещества и его массу: 12,04*10 в 24 степени атомов кислорода....
3
Дайте характеристику климотообразующему фактору! пож!...
1
В3-х вагонах поезда 100 пассажиров. в 1 -ом и во 2 -ом вагонах вместе 66 пассажиров,...
3
Найдите значение выражения : 1)2,7х+5,4х-1,8 при х=5,5....
1
i,n:integer;
a:array[1..20]of integer;
begin
for i:=1 to 20 do
begin
readln(a[i]);
if a[i]<0 then n:=n+1
end;
writeln('ответ: ',n)
end.