Ответы на вопрос:
1. не знаю, как совместить стороны и диагонали в одном решении, сделал нахождение по диагоналям. var d1, d2, s: real; begin write('введите диагонали d1 и d2'); readln(d1, d2); if(d1> 0) and (d2> 0) then begin s: =(d1*d2)/2; writeln('площадь равна: ', s) end else writeln('условия неверны! ') end.чтобы написать, достаточно знать основы паскаля. если есть вопросы к какой-либо строке - напиши.2. 16*sqr(sqr((x))
Популярно: Информатика
-
kat24327.01.2021 08:15
-
koool322.03.2020 01:00
-
vichkapetrenko08.02.2023 17:49
-
00BlackMoon0026.06.2020 16:54
-
vitlikkushnirp08qv413.09.2022 17:03
-
marina0350199729.05.2023 04:19
-
Artemmundryl08.05.2020 14:06
-
настена090213.06.2023 14:59
-
Анасія18.06.2021 03:17
-
ленок21624.01.2023 00:19