Войти Регистрация Спроси ai-bota

Напишите программу в паскале : ввести массив из пяти чисел. вывести на экран отрицательные числа

Показать ответ

Ответ:

BettaPi2003

05.10.2020 15:00

PascalABC.NET 3.2, сборка 1387 от 20.02.2017
Внимание! Если программа не работает, обновите версию!

begin
ReadArrReal('Введите 5 чисел',5).Where(x->x<0).Println
end.

Пример
Введите 5 чисел 4 -3.1 5.7 -2 6
-3.1 -2

0,0(0 оценок)

Популярные вопросы: Информатика

АнелияУразбаева

20.01.2023 23:00

Решить информационный объём одного сообщения составляет 0,5 кбайт, а другого 128 битов. во сколько раз информационный объём первого сообщения больше объёма второго сообщения....

polinamypp

11.07.2020 03:16

Какое логическое выражение истинно, если х ϵ [-10, 10]? (x 10) и (x -10) (x 10) или (x -10) (x 10) или (x = -10) (x = -10) и (x = 10) и укажите правильный вариант записи условия...

olavishneva

23.10.2021 22:24

Определите, сколько времени модем, работает со скоростью 1200 бт.с, будет передавать данные 10 страниц текста с 40рядкв по 80 символов в строке. (По таблице кодировки ASCII)...

Сач16

28.12.2020 15:21

Пайтон. Дано куб сторони якого набувають пять значень 3, 4.5, 6, 7.5, 9. Розробіть код визначення об єму кожного з них...

bearwithsphere

15.05.2020 05:20

При авіаційному сполученні використовують місцевий час часі з меридіаном, на якому знаходиться Грінвічська обсерваторія. Дляаеропортів вильоту та прибуття, Часові пояси характеризуються...

rufergem

09.06.2023 00:39

Дано прямокутну таблицю А розміром nxn (1 =n =100), що заповнена цілими числами. (-65000SAi, S65000) Потрібно отримати прямокутнумаксимальному елементу в 1-му рядку та j-му стовпчику...

NekoChan625

30.10.2022 06:52

Pascal ABC Дан список учебной группы, включающий n человек. Для каждого студента известны: фамилия, имя, дата рождения и оценки по всем дисциплинам за последний семестр. Дисциплины...

Naruto1111111111

19.04.2023 01:27

Решить на языке программирования и рассказать на каком! Дано натуральное число Х. Если оно является число Фибоначчи, то присвоить переменной Т значение 1, иначе значение 0. Вывести...

hjhjhjhhhhhhh

16.04.2023 18:48

Определи, сколько звёздочек будет напечатано в результате выполнения следующего фрагмента алгоритма, записанного на школьном алгоритмическом языке. нц для i от 0 до 5 вывод «*»...

123FoxYouTube123

19.09.2020 00:55

Выражения а) cos альфа *tg альфа + sin альфа б) (2sin альфа+3 cos альфа)^2 +(2cos альфа-3 sin альфа)...

Полный доступ

Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota Оформи подписку