• Что делает программа?
    Program Summ;
    Var a, b, c: integer;
    Begin
          Writeln ((перевёрнутая запятая, не знаю как написать :D, буду обозначать её букой J) Введите 1-вое число:J );
           Readln (a);
           Writeln (JВведите 2-рое число:J );
           Readln (b);
           c:a+b;
           writeln ( Результат = J,c);
    End.

Ответы 2

  • Программа ищет сумму двух чисел
    • Автор:

      bacongnjr
    • 5 лет назад
    • 0
  • Данная программа выдаёт ошибку. Давайте для начала её отладимProgram Summ;Var a, b, c: integer;Begin      Writeln ('введите первое число: ' );         Readln (a);       Writeln ('Введите 2-рое число:');       Readln (b);       c:a+b;                                 {вот на этом этапе компилятор нам выдаст ошибку строка должна выглядеть так c:=a+b;  }       writeln ( 'Результат =' ,c);End.ну а теперь можно её и разобратьVar a, b, c: integer;                              Объявляем переменныеBegin  Writeln ('введите первое число: ' );    выводим на экран предложение ввести число  Readln (a);                                        присваиваем переменной А введённое число  Writeln ('Введите 2-рое число:');        выводим на экран предложение ввести число  Readln (b);                                        присваиваем переменной В введённое число  c:=a+b;                                         Присваиваем переменной С сумму чисел А и Вwriteln ( 'Результат =' ,c);                    Выводим результатEnd.
  • Добавить свой ответ

Еще вопросы

Войти через Google

или

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

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

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