Помогите написать программу и блок схему к ней
Составьте программу, вычисляющую сумму, разность и произведение двух целых чисел, введенных с клавиатуры.

Программа на Pascal:

program qq;
var a,b:integer;
begin
readln(a);
readln(b);
writeln('Сумма=',a+b);
if a > b then
writeln('Разность=',a-b) else writeln('Разность=',b-a);
writeln('Произведение=',a*b);
end.

Блок-схема: