Войти
Регистрация
Спроси ai-bota
В
Все
М
Математика
А
Английский язык
Х
Химия
Э
Экономика
П
Право
И
Информатика
У
Українська мова
Қ
Қазақ тiлi
О
ОБЖ
Н
Немецкий язык
Б
Беларуская мова
У
Українська література
М
Музыка
П
Психология
А
Алгебра
Л
Литература
Б
Биология
М
МХК
О
Окружающий мир
О
Обществознание
И
История
Г
Геометрия
Ф
Французский язык
Ф
Физика
Д
Другие предметы
Р
Русский язык
Г
География
Показать больше
Показать меньше
ilviragaraeva2
24.06.2020 06:37 •
Информатика
Введите строку из 5 чисел компьютер должен определить отрицательные числа
Показать ответ
Ответ:
shopiakprod
20.09.2020 16:28
Var
a:array[1..5] of integer;
i:integer;
begin
for i:=1 to 5 do readln(a[i]);
for i:=1 to 5 do if a[i] < 0 then write(a[i],' ');
writeln('- отрицательные');
readln;
end.
Так?
0,0
(0 оценок)
Популярные вопросы: Информатика
ShkolnikN15
19.03.2020 00:08
Работа в паскале. 1)дана матрица a(n,m). получить вектор b(n), компоненты которого находятся по правилу: b[i] равно количеству положительных чисел, c которых начинается...
pomorcevakata98
08.02.2020 14:54
Какого рода информация передается по шинам микропроцессорной системы ? умоляю об , что это ? –данные – адрес памяти – сигналы и питание + все перечисленные виды информации....
agisheveevelina
30.12.2021 08:59
20 при интернет-соединении с максимальной скоростью передачи данных 204 800 бит/с аудиофайл размером 3600 кбайи будет в лучшем случае передаваться а) 5 мин б) больше...
ZenRenson
19.09.2020 20:32
Выведите на экран все положительные числа которые будут меньше числа введённого с клавиатуры (используя оператор while) pascal abc !...
nastyaant062002
19.09.2020 20:32
Даны две точки в плоской прямоугольной системе координат напишите программу определяющую которая из точек находящиеся ближе к началу координат...
meloo1
18.08.2022 21:44
перевести десятичные дроби в двоичную и восьмеричную системы счисления, оставив пять знаков в дробной части нового числа. а) 12,5; б) 312,54; в) 219,333. показать полное...
emotuz60p011ls
02.06.2020 04:18
Перевести целые числа из десятичной системы счисления в двоичную, восьмеричную и шестнадцатеричную системы: а) 356; б) 514; в) 2018; г) 7654; д) 78. показать полное...
anuri1
22.11.2022 04:42
Перевести числа в десятичную систему счисления: а) а8 = 341; б) а6 = 341; в) а16 = 341; г) а5 = 34,1; д) а16 = е41а,12. показать полное решение....
dimanicich
06.07.2020 12:28
Составить блок схему линейного алгоритма: a=100; b=15. необходимо вычесть из большего числа меньшее и к полученной сумме прибавить 14 и результат умножить на 3....
Поля200601
15.08.2022 18:30
Вкакой системе счисления и с каким основанием может существовать число 1301...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
Спроси ai-бота
a:array[1..5] of integer;
i:integer;
begin
for i:=1 to 5 do readln(a[i]);
for i:=1 to 5 do if a[i] < 0 then write(a[i],' ');
writeln('- отрицательные');
readln;
end.
Так?