Есть ответ 👍

Ввести 2 числа. если их произведение отрицательно, умножить его на 2 и вывести на экран, в противном случае увеличить его в 1,5 раза и вывести на экран.

148
498
Посмотреть ответы 2

Ответы на вопрос:


var a,b: real;

begin 

  readln(a,b);

  if a*b< 0 then writeln(a*b*2) else writeln(a*b*1.5);

end.


Вматрице 42 элемента. заполним её случайными значениями в диапазоне от  x/2 до  2*y, тогда в среднем половина значений попадет в заданный диапазон. const   m=6;   n=7; var   a: array[1..m,1..n] of integer;   i,j,k,x,y,x1,y1,s: integer; begin   randomize;   write('введите через пробел x и y: '); read(x,y);   if y< x then begin s: =x; x: =y; y: =s end;   writeln('исходный массив');   if x< 0 then x1: =2*x else x1: =x div 2;   if y< 0 then y1: =y div 2 else y1: =2*y;   k: =y1-x1+1; s: =0;   for i : = 1 to m do   begin       for j : = 1 to n do       begin           a[i,j]: =random(k)+x1;           write(a[i,j]: 4);           if (a[i,j]> =x) and (a[i,j]< =y) then s: =s+a[i,j]       end;       writeln   end;   for j: =1 to n do a[1,j]: =s;   writeln('результирующая матрица');   for i : = 1 to m do   begin       for j : = 1 to n do write(a[i,j]: 4);       writeln   end end. тестовое решение: введите через пробел x и y: -5 10 исходный массив     0  11  -6  15  -8  -2  -6     9    0    6    1  11  -2  -1     2    9  13  -1    6    0    9     6    1  -5    8  -3    0  -5     8    4  -8    7  -6    6  11   18  -1  15  -8  -9  -9  20 результирующая матрица   62  62  62  62  62  62  62     9    0    6    1  11  -2  -1     2    9  13  -1    6    0    9     6    1  -5    8  -3    0  -5     8    4  -8    7  -6    6  11   18  -1  15  -8  -9  -9  20

Реши свою проблему, спроси otvet5GPT

  • Быстро
    Мгновенный ответ на твой вопрос
  • Точно
    Бот обладает знаниями во всех сферах
  • Бесплатно
    Задай вопрос и получи ответ бесплатно

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

Caktus Image

Есть вопросы?

  • Как otvet5GPT работает?

    otvet5GPT использует большую языковую модель вместе с базой данных GPT для обеспечения высококачественных образовательных результатов. otvet5GPT действует как доступный академический ресурс вне класса.
  • Сколько это стоит?

    Проект находиться на стадии тестирования и все услуги бесплатны.
  • Могу ли я использовать otvet5GPT в школе?

    Конечно! Нейросеть может помочь вам делать конспекты лекций, придумывать идеи в классе и многое другое!
  • В чем отличия от ChatGPT?

    otvet5GPT черпает академические источники из собственной базы данных и предназначен специально для студентов. otvet5GPT также адаптируется к вашему стилю письма, предоставляя ряд образовательных инструментов, предназначенных для улучшения обучения.

Подпишись на наш телеграмм канал

GTP TOP NEWS