Проверим всех (посмотрим, сколько людей умеют программировать)
Пожалуйста, напишите программу на Pascal с следующими требованиями: введите три целых числа и выведите их в порядке от большего к меньшему. Друзья-программисты, это просто, да?
Ответы (10)
program 1 var a,b,c,p,s:real; begin white(＇input a,b,c:＇) readln(a,b,c) p: =a+b+c)/2; s:=sqrt(p*(p-a)*(p-b)*(p-c)); writeln(＇s=＇,s:10:2); end
— Все ответы загружены —