Текст задания

Расчет величины  Т  товарного обеспечения оборота:


где  n - количество наименований товаров;

       Pi   - количество товара поставленного за отчетный период;

       Ki , Hi - остатки товара на конец и начало отчетного периода соответственно.

Описание используемых переменных

1.      n - количество наименований товаров, тип целый;

i – номер наименования товара, тип целый.

Pi   - количество товара поставленного за отчетный период. Тип целый

Ki , Hi - остатки товара на конец и начало отчетного периода соответственно. Тип целый

Блок-схема алгоритма


Исходный код программы с комментариями

Var
n,i,p,p1,k,k1,h,h1: integer; // объявление переменных
begin
Write('n='); 
Readln(n); 		//Ввод n
For i:=1 to n do
begin
Write('p[',i,']='); 
Readln(p1);		//Ввод p[i]
Write('k[',i,']=');
Readln(k1);		//Ввод k[i]
Write('h[',i,']=');
Readln(h1);		//Ввод h[i]
p:=p+p1;		//Суммирование P
k:=k+k1;		//Суммирование K
h:=h+h1;		//Суммирование H
end;
Writeln('T=',p+k-h); // Вывод результата на экран
end.

Написать отзыв

Внимание: HTML не поддерживается! Используйте обычный текст!
    Плохо           Хорошо

Подсчет товарного обеспечения оборота в Pascal


0 отзывов / Написать отзыв


Помогло решение? Буду рад маленькой награде=)

Теги: Pascal

Не подошла работа?

Узнайте стоимость написания работы по Вашему заданию

(это быстро и бесплатно)

Узнать стоимость

Спасибо, не надо