Даны три числа:A,B,C. Найти их сумму и произведение, выяснить что больше сумма или произведение. Не на языке Паскаля..
Даны три числа:A,B,C. Найти их сумму и произведение, выяснить что больше сумма или произведение. Не на языке Паскаля..
Гость
Ответ(ы) на вопрос:
Гостьvar a,b,с,s,p:integer;
begin
write('a=');
readln(a);
write('b=');
readln(b);
write('с=');
readln(с);
s:=a+b+с;
p:=a*b*с;
if s>p then
writeln('Сумма больше произведения');
if p>s then
writeln('Произведение больше суммы');
end.
Не нашли ответ?
Похожие вопросы