59

1. Составьте программу, котораявычисляет сред нюю плотность раствора (в кг/м 3) по…

24 февраля 2023

1. Составьте программу, котораявычисляет сред нюю плотность раствора (в кг/м 3) по результатам из мерения плотности 7 проб (задаются в массиве кон стант: 1205, 1350, 1170, 1320, 1220, 1310, 1180).

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

50

Program nikitos1515; const mas: array[1… 7] of integer=(1205, 1350, 1170, 1320, 1220, 1310, 1180); var i: integer; sredn: real; beginfor i: =1 to 7 dosredn: =sredn+mas[i]; sredn: =sredn/7; writeln ('Средняя плотность раствора=',sredn); end.

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

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