Даны 3 действительных числа найдите наибольшее значене из их суммы и произведения. Составить алгоритм и программу. В паскале
Ответы
Ответ дал:
0
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 s>p then writeln('Сумма больше произведения')
else if s<p then writeln('Произведение больше суммы')
else writeln('Сумма и произведение равны');
end.
begin
p:=0;
s:=0;
writeln('Введите через пробел три числа');
read(a,b,c);
s:=a+b+c;
p:=a*b*c;
if s>p then writeln('Сумма больше произведения')
else if s<p then writeln('Произведение больше суммы')
else writeln('Сумма и произведение равны');
end.
Вас заинтересует
1 год назад
6 лет назад
6 лет назад
8 лет назад
9 лет назад