Составить программу вычисления произведения не нулевых элементов массива (а) вещественных чисел [1..5]
Ответы на вопрос:
var
a: array [1..5] of real; //массив из пяти вещественных элементов
i: integer; //переменная для цикла
s: real; //значение произведения
begin
s: = 1;
for i: = 1 to 5 do //вводим элементы массива
begin
writeln('введите ', i, ' элемент массива');
readln(a[i]);
if a[i] < > 0 then s: = s * a[i]; {если элемент массива не равен 0, то умножаем значение произведения на элемент массива}
end;
writeln('произведение не нулевых элементов массива: ', s); {выводим значение произведения}
end.
|нарядив ёлку|, (1) побежали× к бабушке, (2)
|сидевшей в другой комнате|.
|нарядив ёлку| - деепричастный оборот
|сидевшей в другой комнате| - причастный оборот
спортсмен, (3) |выполнив норму мастера|, (4) вошёл× в состав сборной страны.
|выполнив норму мастера| - деепричастный оборот
ответ: 2. 1, 3, 4
1 Program work1;
2 uses crt;
3 var x,y,z: real;
4 begin
5 clrscr ;
6 writeln('введите число x');
7 readln(x);
8 writeln('введите число y');
9 readln(y);
10 writeln('введите число z');
11 readln(z);
12 if (x<=3) and (x>=1) then writeln ('x-принадлежит интервалу') else writeln ('x не принадлежит и интервалу');
13 if (y<=3) and (y>=1) then writeln ('y- принадлежит интервалу') else writeln ('y не принадлежит и интервалу');
14 if (z<=3) and (z>=1) then writeln ('z-принадлежит интервалу') else writeln ('z не принадлежит и интервалу');
15 readln;
Объяснение:
https://ru-static.z-dn.net/files/dd2/796d7c2d2af92262840bd7209eb7f670.bmp картинка
Реши свою проблему, спроси otvet5GPT
-
Быстро
Мгновенный ответ на твой вопрос -
Точно
Бот обладает знаниями во всех сферах -
Бесплатно
Задай вопрос и получи ответ бесплатно
Популярно: Информатика
-
nikav92com30.06.2023 04:26
-
gsubxdu23.09.2022 20:35
-
AgataKlemen0317.09.2022 07:08
-
Super36418.02.2020 09:37
-
ka93114.10.2020 11:07
-
buckubarnes1711.03.2021 09:16
-
Violetta71107.05.2021 04:20
-
matetskayamilan06.02.2022 06:44
-
angelinadvuradkina23.02.2023 08:59
-
sakulich0512.01.2022 08:13
Есть вопросы?
-
Как otvet5GPT работает?
otvet5GPT использует большую языковую модель вместе с базой данных GPT для обеспечения высококачественных образовательных результатов. otvet5GPT действует как доступный академический ресурс вне класса. -
Сколько это стоит?
Проект находиться на стадии тестирования и все услуги бесплатны. -
Могу ли я использовать otvet5GPT в школе?
Конечно! Нейросеть может помочь вам делать конспекты лекций, придумывать идеи в классе и многое другое! -
В чем отличия от ChatGPT?
otvet5GPT черпает академические источники из собственной базы данных и предназначен специально для студентов. otvet5GPT также адаптируется к вашему стилю письма, предоставляя ряд образовательных инструментов, предназначенных для улучшения обучения.