Дан прямоугольник со сторонами а и b. составьте блок-схему и программу на языке паскаль алгоритма нахождения площади прямоугольника

Программа на паскале ниже, блок-схема - в прилагаемом файле
var a,b,s : real;
begin
write('a=');readln(a);
write('b=');readln(b);
s:=a*b;
writeln('s=',s)
end.
Пример работы программы:
a=5
b=6
s=30