Помогите!!! Решить задачу на языке программирования Pascal: Рассчитайте еженедельную выручку зоопарка, если известно: - количество проданных билетов каждый день - цена взрослого билета - 115 руб. - цена детского на 30% дешевле чем взрослого.
program zoopark; var biletvs,biletde,vzros,dets,summ: real; beginwrite('Введите Количество проданных билетов для Взрослых'); readln(biletvs); write('Введите Количество проданных билетов для Детей'); readln(biletde); vzros:=115; dets:=115/100*70; summ:=((biletvs*vzros) (biletde*dets))*7; write('Еженедельная выручка зоопарка =',summ); end.
Вроде должно быть так
более месяца назад
Ваш ответ:
Вы можете из нескольких рисунков создать анимацию (или целый мультфильм!). Для этого нарисуйте несколько последовательных кадров
и нажмите кнопку Просмотр анимации.
