На аптечном складе хранятся лекарства. Сведения о лекарствах содержатся в специальной ведомости: наименование лекарственного

127

396

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

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

YouSister

Другие предметы

4,6(77 оценок)

type
   lek = record
     naim: string;
     kol,cen,srok: integer;
   end;
var
   a: array[1..100] of lek;
   i,n,k,z,max,min: integer;
begin
   write('введите количество наименований: ');
   readln(n);
   for i:=1 to n do
      begin
         write('название: ');
         readln(a[i].naim);
         write('количество: ');
         readln(a[i].kol);
         write('цена: ');
         readln(a[i].cen);
         write('срок годности: ');
         readln(a[i].srok);
      end;
   max:=a[1].cen;
   min:=a[1].cen;
   k:=0;
   z:=0;
   write('препараты, со сроком годности 3+ месяцев: ');
   for i:=1 to n do
      begin
         if a[i].cen>max then max:=a[i].cen;
         if a[i].cen<min then min:=a[i].cen;
         if a[i].srok>3 then write(a[i].naim,' ');
         k:=k+a[i].kol;
         z:=z+a[i].cen*a[i].kol;
      end;
   writeln;
   writeln('цена самого дорогого товара: ',max);
   writeln('цена самого дешевого товара: ',min);
   writeln('количество препаратов: ',k);
   writeln('стоимость всех хранящихся на складе препаратов: ',z);
   readln;
end.

Стары

Другие предметы

4,6(60 оценок)

mattino:утро

pomerigio:полудник

sera:вечер

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

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

Задай свой вопрос

Популярно: Другие предметы

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

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

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

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

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

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