Даны 3 реальных числа найдите величайшее значене из их суммы и

Даны 3 реальных числа найдите наибольшее значене из их суммы и творенья. Составить метод и программу. В паскале

Задать свой вопрос
1 ответ
Var a,b,c,s,p:longint; 
begin 
p:=0; 
s:=0; 
writeln('Введите через пробел три числа'); 
read(a,b,c); 
s:=a+b+c; 
p:=a*b*c; 
if sgt;p then writeln('Сумма больше творения') 
else if slt;p then writeln('Творенье больше суммы') 
else writeln('Сумма и творенье равны'); 
end.
, оставишь ответ?
Имя:*
E-Mail:


Добро пожаловать!

Для того чтобы стать полноценным пользователем нашего портала, вам необходимо пройти регистрацию.
Зарегистрироваться
Создайте собственную учетную запить!

Пройти регистрацию
Авторизоваться
Уже зарегистрированны? А ну-ка живо авторизуйтесь!

Войти на сайт