М
Молодежь
К
Компьютеры-и-электроника
Д
Дом-и-сад
С
Стиль-и-уход-за-собой
П
Праздники-и-традиции
Т
Транспорт
П
Путешествия
С
Семейная-жизнь
Ф
Философия-и-религия
Б
Без категории
М
Мир-работы
Х
Хобби-и-рукоделие
И
Искусство-и-развлечения
В
Взаимоотношения
З
Здоровье
К
Кулинария-и-гостеприимство
Ф
Финансы-и-бизнес
П
Питомцы-и-животные
О
Образование
О
Образование-и-коммуникации
ilyagammershmi
ilyagammershmi
05.12.2022 00:24 •  Информатика

Вмассиве а (10) найти произведение элементов, принадлежащих промежутку [-2; 2]

👇
Ответ:
никита3427
никита3427
05.12.2022
Const n=10;
var  a: array[1..n] of integer;
   i, p : integer;
begin
Randomize;
 writeln('Исходный массив:');
for i:=1 to n do
 begin
  a[i]:=random(21)-10;
  write(a[i],' ');
 end;
 writeln;
p:=1;
for i:=1 to n do
 if (a[i]>=-2)and(a[i]<=2) then p:=p*a[i];
writeln('p=',p);
end.

Пример:
Исходный массив:
-1 2 -8 -5 4 2 -4 5 4 1 
p=-4
4,6(37 оценок)
Ответ:
fortunazanna
fortunazanna
05.12.2022
// PascalABC.NET 3.0, сборка 1144 от 16.01.2016
begin
  var a:=ArrRandom(10,-5,5).Println.Where(x->x in [-2..2]);
  var p:=1; foreach var ai in a do p*=ai;
  Writeln('П=',p)
end.

Тестовое решение:
3 2 -5 2 -5 -1 1 5 -1 3
П=4
4,4(78 оценок)
Открыть все ответы
Ответ:
фуад05
фуад05
05.12.2022
Язык программирования не указан, потому - самый простой вариант - программа на паскале. Даже на паскале задачу можно решать различными с массивом, без массива, со строками, без строк. Опять-таки, самый простой вариант - со строками.
var s,p:string; n,i:integer;
begin
writeln('Введите символы:');
readln(s);
n:=pos('.',s)-1;
writeln('n = ',n);
p:='';
for i:=1 to n do p:=s[i]+p;
writeln('а)');
writeln(p);
p:='';
if n mod 2 = 0 then i:=2 else i:=1;
while i<=n do
 begin
 p:=p+s[i];
 i:=i+2;
 end;
writeln('б)');
writeln(p);
end.

Пример:
Введите символы:Даны символы s1, s2, ... Известно, что символ s1 отличен от точки
n = 21
а)
 ,2s ,1s ыловмис ынаД
б)
Дн ивл 1 2 
4,4(66 оценок)
Ответ:
жан108
жан108
05.12.2022

Inkscape (Инкскейп) — свободно распространяемый векторный графический редактор, удобен для создания как художественных, так и технических иллюстраций (вплоть до использования в качестве САПР общего назначения, чему также лёгкость обмена чертежами). Это стало возможным во многом благодаря открытому формату SVG, развиваемому консорциумом W3C. Формат SVG позволяет создавать иллюстрации различного типа, в том числе анимированные. Поскольку SVG основан на расширяемом языке разметки (XML), к нему можно писать расширения, чем авторы Inkscape и пользуются[8]. Программа распространяется на условиях GNU General Public License.

4,4(8 оценок)
Новые ответы от MOGZ: Информатика
logo
Вход Регистрация
Что ты хочешь узнать?
Спроси Mozg
Открыть лучший ответ