Помогите!!! Решить задачу на языке программирования Pascal: Рассчитайте еженедел...

ekaterina201497 @ekaterina201497

July 2022 1 11 Report

Помогите!!!
Решить задачу на языке программирования Pascal:
Рассчитайте еженедельную выручку зоопарка, если известно: - количество проданных билетов каждый день - цена взрослого билета - 115 руб. - цена детского на 30% дешевле чем взрослого.

Answers & Comments

Mesher 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.

Вроде должно быть так

1 votes Thanks 1

ekaterina201497 спасибо огромное:))) очень помог!

Answers & Comments

reshit zadachu na yazyke programmirovaniya paskal po teme zapisi 1 sozdat spi

ispolzujte have ili has 1 they a big house in the country 2 my friend

ispolzujte neobhodimoe mestoimenie 1 i wrote a letter them his mine

ispolzujte v predlozheniyah nuzhnuyu formu glagola to be am is are was were

vyberite nuzhnuyu formu glagola 1 they always do are doing their homework in

pomogite nuzhno razrabotat na html formu soderzhashuyu polya imya tekstovoe pole

4; Writeln('X=',x:5:2,', Y=',y); x:=x+0.25 end end...

pozhalujsta pomogite nuzhna tolko blok shema var xreal begin x 123 while

pomogitepozhalujsta v kruge radiusa r nahoditsya krug vdvoe menshe radiusa v

reshit zadachu na yazyke programmirovaniya pascal najti summu naturalnyh chetnyh ch

рекомендуемые вопросы

Helpful Links

Helpful Social