profile
Опубликовано 6 лет назад по предмету Информатика от elizaveta50

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

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

    1. Ответ
      Ответ дан MMORPG
      Прости, только введи там три переменных, поторопился, ввел две.
Самые новые вопросы