Впаскале. напишите программу по нахождению периметра и площади шестнадцатиугольника
291
428
Ответы на вопрос:
!
периметр:
program x;
var
y,x1,x2,x3,x4,x5,x6,x7,x8,x9,x10,x11,x12,x13,x14,x15,x16: integer;
begin
writeln('введите длины всех сторон шестнадцатиугольника, см: ');
readln(x1,x2,x3,x4,x5,x6,x7,x8,x9,x10,x11,x12,x13,x14,x15,x16);
y: =x1+x2+x3+x4+x5+x6+x7+x8+x9+x10+x11+x12+x13+x14+x15+x16;
writeln('периметр данного шестнадцатиугольника,см= ',y);
readln;
end.
площадь:
var a : integer;
s : real;
function squaretr(a : integer) : real;
begin
squaretr : = (sqrt(3)*a)/2
end;
begin
writeln('введите сторону шестнадцатиугольника: ');
readln(a);
s : = 16 * squaretr(a);
writeln('площадь шестнадцатиугольника со стороной а, равна ', s: 16: 16);
end.
Program prog; uses crt; var a: array[1..100] of real; m: integer; s1, s2, s3, s4: real; begin; for m: =1 to 12 do begin write('в месяц ',m,' температура t = '); readln(a[m]); end; s1: =(a[12]+a[1]+a[2])/3; s2: =(a[3]+a[4]+a[5])/3; s3: =(a[6]+a[7]+a[8])/3; s4: =(a[9]+a[10]+a[11])/3; writeln('средняя температура зимних месяцев = ', s1: 0: 3); writeln('средняя температура весенних месяцев = ', s2: 0: 3); writeln('средняя температура летних месяцев = ', s3: 0: 3); writeln('средняя температура осенних месяцев = ', s4: 0: 3); end.
Реши свою проблему, спроси otvet5GPT
-
Быстро
Мгновенный ответ на твой вопрос -
Точно
Бот обладает знаниями во всех сферах -
Бесплатно
Задай вопрос и получи ответ бесплатно
Популярно: Информатика
-
Miya5koka12.04.2022 19:51
-
новичок53517.06.2022 08:31
-
макс306903.01.2022 09:01
-
Дарья431121.12.2020 02:34
-
seksi250520.05.2020 17:45
-
imi226.05.2021 20:00
-
Callll28.11.2022 05:23
-
kozhoeva200311.12.2021 17:15
-
julija7414.09.2020 17:29
-
voprooos01.05.2021 21:25
Есть вопросы?
-
Как otvet5GPT работает?
otvet5GPT использует большую языковую модель вместе с базой данных GPT для обеспечения высококачественных образовательных результатов. otvet5GPT действует как доступный академический ресурс вне класса. -
Сколько это стоит?
Проект находиться на стадии тестирования и все услуги бесплатны. -
Могу ли я использовать otvet5GPT в школе?
Конечно! Нейросеть может помочь вам делать конспекты лекций, придумывать идеи в классе и многое другое! -
В чем отличия от ChatGPT?
otvet5GPT черпает академические источники из собственной базы данных и предназначен специально для студентов. otvet5GPT также адаптируется к вашему стилю письма, предоставляя ряд образовательных инструментов, предназначенных для улучшения обучения.