Напишите программу в паскалях
Мама в магазине купила А конфет по В рублей и D печениья по F рублей. Сколько денег потратила мама?

var  a, b, d, f, s1, s2: integer;  beginWriteln('Сколько конфет купила мама?');Readln(a);Writeln('Сколько стоят конфеты?');Readln(b);Writeln('Сколько печенья купила мама?');Readln(d);Writeln('Сколько стоят печенья?');Readln(f);s1:=a*b;s2:=d*f;Writeln('Мама купила конфет на ', s1, ' рублей, а печенья на ', s2, ' рублей.');Writeln('Всего мама потратила: ', s1+s2, ' рублей.');end.