В массиве записана стоимость каждого товара, продаваемого фирмой. Фирма прекратила продавать товары, стоимость которых равна значению, записанному в К-той ячейке массива. Определить какие товары продолжает продавать фирма.
Через Паскаль.
извините за  кач-во ._.



Есть ответ
17.12.2022
127

Ответ


 

program MYPROG;

 

var

    goods: array[0..10] of string;

    prices:array[0..10] of real;

    number_of_goods:integer;    

    k:real;

    i:integer;

begin

  number_of_goods :=10;

  //Заполняем каким то образом названия товаров и цены к ним

  goods[0] := 'Дети';               prices[0] := 15;

  goods[1] := 'Женщины';     prices[2] := 10;

  goods[2] := 'Щеночки';       prices[3] := 150;

 

 readln(k);

 if (k>number_of_goods) or (k


Если вы нашли правильное решение, вы можете поблагодарить нас начиная с 10 рублей.
Просто нажмите на кнопку "Подарить".
17.12.2022
Этот сайт использует cookies (Политика Cookies). Вы можете указать условия хранения и доступ к cookies в своем браузере.