Renavalion
26.05.2021 06:41

Составить программы: 1)вычисления у=2корня из х,вводимого пользователем 2)вычисления у={х^2/2,если х> =0 {-х+4,если х< 0 3)вычисления у=2корня из х для хе[0; 100]

Нажмите на рекламу ниже и сразу увидите ответ
Популярные вопросы:
Ответ:
ТаНюша2451
30.12.2022 07:53

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

2)Найдите свою целевую аудиторию — тех, кому ваш продукт может быть интересен. Выясните, какую их явную или пока скрытую потребность он удовлетворить. Вам нужно представить вашего потенциального покупателя: пол, возраст, семейное положение, социальный статус. В идеале нужно также понять проблемы и желания клиента, особенности его поведения и характера, представить ситуации, когда ему может понадобиться ваша услуга или продукт. Это вам на всех этапах — от выбора помещения до рекламы и продвижения.

3)Возможно, ваша аудитория привыкла покупать все в интернете, а может, ваш товар нужно пощупать или примерить — тогда вам понадобится помещение под магазин. Где он должен находиться — в центре или в спальном районе? Подумайте, возможно, вам еще понадобится склад или офис. Если же вы собираетесь продавать товар исключительно онлайн, то подумайте о доставке. Доставка бижутерии и доставка бассейнов — разные услуги.

Объяснение:

под цифрами 1,2,3 не ответы на ваши вопросы,я создал свои .впринципе так и можно записать,немного по другому плану.

0,0(0 оценок)
Ответ:
21.05.2022 01:07
Uses Crt;
const
  n=10;
var
  a,b:array[1..n] of integer;
  i,k,t:integer;
begin
  ClrScr;
  Randomize;
  for i:=1 to n do begin
    a[i]:=Random(50);
    Write(a[i],' ')
    end;
  Writeln;
  for i:=1 to n do begin
    b[i]:=Random(50);
    Write(b[i],' ')
    end;
  Writeln;
  Write('k t='); Read(k,t);
  for i:=1 to n do begin
    if a[i]>t then a[i]:=a[i]+4;
    Write(a[i],' ')
    end;
  Writeln;
  for i:=1 to n do begin
    if b[i]>10*k then b[i]:=b[i]+k;
    Write(b[i],' ')
    end;
  Readkey
end.

Тестовое решение:
1 6 23 12 47 1 44 24 6 18
31 30 30 29 0 3 43 32 46 21
k t=2 20
1 6 27 12 51 1 48 28 6 18
33 32 32 31 0 3 45 34 48 23
0,0(0 оценок)
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota Оформи подписку
logo
Начни делиться знаниями
Вход Регистрация
Что ты хочешь узнать?
Спроси ai-бота