Найдите ошибку.. она не работает(( program plоснаd; var а,в,с: real; d: real; р: real; s: real; begin writeln('задайте стороны a,в,с: '); read(а,в,с); р: =(а + в + с)/2; d: =a; if dd then begin s: =sqrt(p(p-a)(p-b)*(p-c)); writeln ('площадь: ',s) end else writeln (a,b,с, '- не являются сторонами треугольника'); end.

124

448

Посмотреть ответы 3

Ответы на вопрос:

Antoniow27

Информатика

4,5(46 оценок)

ты елсе пропустила в первом, когда начала второй запрос делать ну и в третьем что то пропустила)) и енд в 3 с конца без точки запятой))

mihajlova2011

Информатика

4,4(50 оценок)

program plochad;

var a,b,c: real; d: real; p: real; s: real; begin writeln('задайте стороны a,b,c: '); read(a,b,c); p: =(a + b + c)/2; d: =a; if d< b then d: =b; if d< c then d: =c; if p> d then begin s: =sqrt(p*(p-a)*(p-b)*(p-c)); writeln ('площадь: ',s) end else writeln (a,b,c, '- не являются сторонами треугольника'); end.

не работало из-за того, что ты написала везде a,b,c буквами. я их просто заменил на и заработало.

АнютаП1

Информатика

4,4(48 оценок)

Procedure tform1.button1click(sender: tobject); var result, outgo, privilege, price1, price2, price3: real; begin privilege: =30; price1: =0.71; price2: =1.29; price3: =1.64; outgo: =strtofloat(edit1.text); if checkbox1.checked = true then outgo: =outgo-privilege; if outgo < 100 then result: =price1*outgo else if (outgo > = 100) and (outgo < 600) then result: =price2*outgo else result: =price3*outgo; messagedlg('сума для оплати за електроенергію: ' + #13#10 + floattostr(result) + ' грн.', mtinformation, [mbok], 0); end ;

Реши свою проблему, спроси otvet5GPT

Быстро
Мгновенный ответ на твой вопрос
Точно
Бот обладает знаниями во всех сферах
Бесплатно
Задай вопрос и получи ответ бесплатно

Задай свой вопрос

Популярно: Информатика

Есть вопросы?

Как otvet5GPT работает?

otvet5GPT использует большую языковую модель вместе с базой данных GPT для обеспечения высококачественных образовательных результатов. otvet5GPT действует как доступный академический ресурс вне класса.
Сколько это стоит?

Проект находиться на стадии тестирования и все услуги бесплатны.
Могу ли я использовать otvet5GPT в школе?

Конечно! Нейросеть может помочь вам делать конспекты лекций, придумывать идеи в классе и многое другое!
В чем отличия от ChatGPT?

otvet5GPT черпает академические источники из собственной базы данных и предназначен специально для студентов. otvet5GPT также адаптируется к вашему стилю письма, предоставляя ряд образовательных инструментов, предназначенных для улучшения обучения.