Вопрос по информатике:
Вы посетили магазин и купили 10 видов тавара. В таблицу T[1:10] вы записали количество купленного товара каждого вида. В таблицу С[1:10] записали цены единиц каждого вида товара соответственно. Составьте на Паскале программу вычисления общей стоимости всех покупок. Написать с помощью массивов!
Помогите пожалуйста, срочно надо!))
- 09.01.2018 06:50
- Информатика
- remove_red_eye 15579
- thumb_up 24
Ответы и объяснения 1
Var
i:integer;
s:real;
t,c:array[1..10]of real;
begin
writeln('Введите количество купленного товара и его цену:');
for i:=1 to 10 do
begin
readln(t[i],c[i]);
s:=s+t[i]*c[i];
end;
writeln('Общая стоимость: ',s);
end.
- 01.01.1970 00:00
- thumb_up 40
Знаете ответ? Поделитесь им!
Есть сомнения?
Не нашли подходящего ответа на вопрос или ответ отсутствует? Воспользуйтесь поиском по сайту, чтобы найти все ответы на похожие вопросы в разделе Информатика.
Трудности с домашними заданиями? Не стесняйтесь попросить о помощи - смело задавайте вопросы!
Информатика — наука о методах и процессах сбора, хранения, обработки, передачи, анализа и оценки информации с применением компьютерных технологий, обеспечивающих возможность её использования для принятия решений.