Calculate the sum of squares a and b in abc (pascal program)
| November 28, 2020 | education
program f1;
var a, b, su: integer;
begin
read (a, b);
su: = a * a + 2 * a * b + b * b;
writeln (‘The sum of the squares of the numbers a and b =’, s);
end.
One of the components of a person's success in our time is receiving modern high-quality education, mastering the knowledge, skills and abilities necessary for life in society. A person today needs to study almost all his life, mastering everything new and new, acquiring the necessary professional qualities.
