81

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

04 марта 2023

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

категория: информатика



62

Pascal program tovar; var i,k: integer; t,s: real; begins: =0; writeln ('Vvedit kol-vo tovara'); readln (k); for i: =1 to k dobeginwriteln ('Vvedit stoimost',i,'-go tovaru'); readln (t); s: =t+s; end; writeln ('stoimost pokupok-',s); readlnend.

Знаете ответ?


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