Даны два действительные числа. Если числа положительны найти их сумму, если отрицательны — произведение
Нужно нарисовать схему
156
485
Ответы на вопрос:
Program as; var a,b,c,d,p,s: real; uses crt; clrscr; begin readln(a,b,c); p: =(a+b+c)/2; s: =sqrt(p*(p-a)*(p-b)*(p-c)); writeln(s); readln; end.
Популярно: Информатика
-
19.тамара написала на доске своё имя и выполняет следующие пары операций:...
sibirskiysava09.11.2020 18:19 -
Сколько байт потребуется для записи адресов 65535 ячеек оперативной...
imam170729.01.2020 04:14 -
Print (9 и 2) 5. напишите программу для решения задачи: В первом тайме...
zaylera3426.04.2023 13:06 -
Pascal напишите рекурсивную процедуру нахождения первых n чисел фибоначчи....
сынок1623.08.2020 00:16 -
Даны два числа, пользователь вводит первое, затем второе, и выбирает...
АннаЛео14702.02.2021 20:44 -
Чему равно арифметическое выражение? 9 div 3 9 mod 3 10 div 3 10 mod...
muratovsergej06.11.2022 07:48 -
Впервый год засеяно 20га. пшеницы. в последующие годы площадь увеличивали...
yanamalikova22.02.2020 22:02 -
Доклад о единицах измерения информации...
alopavopa04.08.2021 02:30 -
При наличии компьютера, попробуй выполнить задания со стр. 172-173 на...
arzushka7507.05.2022 01:12 -
Геймеры, к вам во У меня в игре почему-то 2 мышки, тоесть когда я управляю...
КoТuK15.06.2022 13:00