Напишите программу на паскале: условие составить алгоритм вывода стоимости товаров в чеке до первой суммы, превышающей 1000 рублей.

155

372

Посмотреть ответы 2

Ответы на вопрос:

flymisflymis

Информатика

4,7(90 оценок)

Program z_1; uses crt; var a,b,c,s: integer; {a,b,c- товары(если нужна стоимость с копейками поменяй integer на real, добавь переменные, если нужны еще товары), s-чек} begin while d< =1000 do begin writeln('введите стоимость товаров'); readln(a,b,c); {задается стоимость товаров с клавиатуры} d: =a+b+c; end; writeln(d); end.