Войти
Регистрация
Спроси ai-bota
оооооаомт
30.01.2023 08:44
Запишите, что будет напечатано в результате выполнения программы.
const a: array [1..8] of integer = (-4, 10,-7,0, 3, -2,-5,9);
var i,s:integer;
begin
s:=1;
for i:=1 to 8 do
if a[i]<0 then s:=s*a[i];
write (s);
end.
Нажмите на рекламу ниже и сразу увидите ответ
↓
Популярные вопросы:
TimurZel
27.12.2020 21:05
Как писать программу в паскале для вычисл. силы всемирного тяготения? формула: f=g*m1*m2\r2...
33708
14.01.2022 16:20
В одной из ячеек электронной таблицы записано арифметическое выражение 50 + 25/(14*10-2) * 5. Запишите это выражение в математическом виде....
денисвеликий
01.02.2021 23:27
Напишить программу яка запитує вік школяра і визначає , у якій ланці він навчається : початкова школа 1-4 класс , основна 5-9 еласс або старша 10-11 класс...
dasha20015678
01.02.2021 23:27
Исправьте программу таким образом, чтобы она работала с массивом любого размера(на питоне) : M=[10,1,8,2,6,5,4,7,2,9,0] for i in range(10): for j in range(i+1,11):...
QueenNics
05.02.2020 02:15
Тема называется нахождение экстремальных элементов в одномерных массивах звучит так - составить программу нахождения заданного экстремального элемента или его порядкового...
Анетта666
21.07.2021 13:19
Петя записал ip-адрес школьного сервера на листке бумаги и положил его в карман куртки. петина мама случайно постирала куртку вместе с запиской. после стирки петя...
Ксенечка4
12.08.2020 15:46
Какое условие нужно задать для поиска в сети интернет информации о породах собак, встречающихся как в норвегии, так и в бразилии? породы собак & норвегия породы...
protasovarsenip0a3kn
21.05.2022 23:37
Сколько битов следует отвести для кодирования данного, имеющего 50 различных значений?...
krll333
21.11.2022 13:51
Информатика илими эмнени окутат...
Ivan733822
04.05.2022 01:17
Определите объём 16-цветного точечного рисунка размером 200 на 200 пикселей в килобайтах....
Ответ:
oksana1410
30.07.2020 13:30
Это получается произведение всех положительных элементов массива.
ответ: 280
0,0
(0 оценок)
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
Спроси ai-бота