Набери следующую программу и запусти на выполнение

Program summa;

Var

a, b, c, s: integer;

begin

a:=59; b:=51; c:=52;

Write (a:3); Write (b:3); Write(c:3);

S:=a+b+c;

Writeln (‘A=’,a);

Writeln (‘B=’,b);

Writeln (‘C=’,c);

Writeln (‘Сумма A+B+C равна ’, s);

End.

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