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

составьте программу, которая бы складывала, вычитала, умножает два произвольных натуральных числа, задаваемых любым пользователем.

  1. Ответ
    Ответ дан Natz

    Напишу на QBasic.

    cls

    input "первое число=", a

    input "второе число=", b

    input "третье число=" c

    D1=a+b+c

    print "D1="; D1

    D2=a-b-c

    Print "D2="; D2

    D3=a*b*c

    print "D3=";D3

    End

     

  2. Ответ
    Ответ дан Попутчица

    program dva_chisla;

    var

       a,b,s,p,v:real;

    Begin

      Writeln('Введите два числа');

      Readln(a,b);

      s:=a+b;

      writeln('Сумма чисел ',a,' + ',b,' = ',s);

      v:=a-b;

      writeln('Разность чисел ',a,' - ',b,' = ',v);

      p:=a*b;

      writeln('Произведения чисел ',a,' * ',b,' = ',p);

    End.

Самые новые вопросы