Дан массив А, в котором хранится стоимость N продуктов. Весь товар

Дан массив А, в котором хранится цена N продуктов. Весь продукт подешевел на р%. Сформировать массив В, в котором хранится новенькая стоимость товаров. Вывести на экран в столбец номер продукта, старая стоимость и новая стоимость. Количество продукта и стоимость продукта ввести с клавиатуры.
Выручайте быстрее!!

Задать свой вопрос
1 ответ
Program pr_1
var n, p, res, i:integer;
a: array [1..n] of real;
begin
readln(n)
readln(p)
p := p / 100
for i:= 1 to n do
begin
res := n * p;
writeln(res);
end;
end.
, оставишь ответ?
Имя:*
E-Mail:


Последние вопросы

Добро пожаловать!

Для того чтобы стать полноценным пользователем нашего портала, вам необходимо пройти регистрацию.
Зарегистрироваться
Создайте собственную учетную запить!

Пройти регистрацию
Авторизоваться
Уже зарегистрированны? А ну-ка живо авторизуйтесь!

Войти на сайт