Помогите пожалуйста срочно нужен анализ и блок схема, больше ничего
3. (на оценку 3). Разработать алгоритм для решения задачи. Даны два числа. Если они равны, то вывести сумму их квадратов. В противном случае вывести квадрат их суммы.

PascalAbc!program ms;uses crt;var a,b:integer;beginwrite('':5,' wwedite a = '); read(a); write('':5,' wwedite b = '); read(b); if a = b then write('':5,'a^2+b^2 = ',sqr(a)+sqr(b)) else write('':5,'(a+b)^2 = ',sqr(a+b)); end.