1. Дано целое двузначное число. Написать программу которая находит квадрат суммы его цифр. pascal

program kvadrat_summy;

var a, b, c:integer;

begin

read (a); {в переменную a будет вводиться значение разряда десятков}

read (b); {в переменную b будет вводиться значение разряда единиц}

c : = (a + b) * (a + b); {переменной с присваивается результат, равный квадрату суммы цифр - значений разрядов}

writeln (c) {выводится результа - значение переменной с}

end.

Так выглядит текст программы. По условиям задаем 3 целочисленных переменных (a, b, c).

После запуска программы вводится значение переменной а, затем - переменной b, программа выдает результат.