• Найти сумму двух чисел А и Б написать код программы на языке паскаль

Ответы 2

  • Var a,b:real;

     

    begin

     

    read(a,b);

     

    Write(a+b);

     

    end.

  • program Symma;

     var a,b;

    begin

     writeln('введите a'); readln (a);

      writeln('введите b'); readln (b);

     Writeln(a+b);

     Readln; {задержка, чтобы не убегала с экрана}

    end.

     

    Можно взять еще одну переменную "с".

     

    program Symma1;

     var a,b,c;

    begin

     writeln('введите a'); readln (a);

      writeln('введите b'); readln (b);

        c:=a+b;

     Writeln(c);

     Readln; {задержка, чтобы не убегала с экрана}

    end.

     

     

    удачи!

  • Добавить свой ответ

Войти через Google

или

Забыли пароль?

У меня нет аккаунта, я хочу Зарегистрироваться

How much to ban the user?
1 hour 1 day 100 years