Составить алгоритм сложения двух целых чисел \(A\) и \(M\), вводимых с клавиатуры. Результат сложения записать в виде переменной \(Z\). По данному алгоритму написать программу в Паскале. Алгоритм алг сложение цел A,M,Z нач ввод A ввод M Z:=A+M вывод Z кон алг сложение цел A,M,Z нач ввод A ввод Z M:=A+Z вывод Z кон алг сложение цел A,M,Z нач ввод A ввод M Z=A+M вывод Z кон Программа в Паскале program summa; var A,M,Z:integer; begin readln(A); readln(M); Z:=A+M; writeln(Z); program summa; var A,M,Z:integer; begin readln(A); readln(M); Z:=A+M; writeln(Z); end. program summa; var A,M,Z:integer; begin readln(A); readln(M); Z:=A+M; writeln(A); end.
Задание

Составить алгоритм сложения двух целых чисел \(A\) и \(M\), вводимых с клавиатуры. Результат сложения записать в виде переменной \(Z\). По данному алгоритму написать программу в Паскале.

Алгоритм

  • алг сложение
    цел A,M,Z
    нач
    ввод A
    ввод M
    Z:=A+M
    вывод Z
    кон
  • алг сложение
    цел A,M,Z
    нач
    ввод A
    ввод Z
    M:=A+Z
    вывод Z
    кон
  • алг сложение
    цел A,M,Z
    нач
    ввод A
    ввод M
    Z=A+M
    вывод Z
    кон

Программа в Паскале

  • program summa;
    var
    A,M,Z:integer;
    begin
    readln(A);
    readln(M);
    Z:=A+M;
    writeln(Z);
  • program summa;
    var
    A,M,Z:integer;
    begin
    readln(A);
    readln(M);
    Z:=A+M;
    writeln(Z);
    end.
  • program summa;
    var
    A,M,Z:integer;
    begin
    readln(A);
    readln(M);
    Z:=A+M;
    writeln(A);
    end.