Ищете решения задач? Наш сайт поможет решить любую задачу онлайн.
0 голосов

Составить и записать программу подсчета стоимости покупок не менее 10 видов товара.

от (61 баллов) 2 в категории Информатика

1 Ответ

0 голосов

Pascal

 

program tovar;

var i,k:integer; t,s:real;

begin

s:=0; 

writeln ('Vvedit kol-vo tovara');

readln (k);

for i:=1 to  k do

begin

writeln ('Vvedit stoimost',i,'-go tovaru');

readln (t);

s:=t+s;

end;

writeln ('stoimost pokupok-',s);

readln

end. 

от Начинающий (136 баллов) 1
...