Учеба и наука
Решено
Дан массив,элементами которого являютсяцены товаров... - вопрос №506773
Дан массив, элементами которого являютсяцены товаров на конец года.Определить новые цены, с учетом месячной инфляции, если известен процент инфляции.Определить среднюю новую цену
декабрь 27, 2012 г.
-
Всего ответов: 1
-
program pr;
uses crt;
const n=10;
var a:array[1..n] of real;
i:integer;
s,t:real;
begin
clrscr;
writeln('vvedite starie zeny');
for i:=1 to n do
readln(a[i]);
writeln('vvedite procent inflyacii');
readln(t);
writeln('starie zeny');
for i:=1 to n do
write(a[i]:8:2);
writeln;
s:=0;
for i:=1 to n do
begin
a[i]:=a[i]*(1+t/100);
s:=s+a[i];
end;
s:=s/n;
writeln('novie zeny');
for i:=1 to n do
write(a[i]:8:2);
writeln;
writeln('sredn=',s:8:2);
readln
end.
Буду благодарна, если отметите
Лучший ответ по мнению автора
Похожие вопросы
Помогите найти алгоритм решения задачи о ранце методом ветвей и границ
сентябрь 1, 2014 г.
Решено
В некоторой стране автомобильный номер длиной 6 символов составляется из заглавных букв
сентябрь 19, 2013 г.