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.
более месяца назад
Ваш ответ:
Вы можете из нескольких рисунков создать анимацию (или целый мультфильм!). Для этого нарисуйте несколько последовательных кадров
и нажмите кнопку Просмотр анимации.
