Написать программы к следующим задачам: а) Вводятся три числа. Вывести на экран сумму з трех чисел б)Человек делает в магазине покупки. Определите сколько денег у него останется после покупки в магазине перчаток стоимостью А руб., портфеля стоимостью B руб. и галстука стоимостью D руб. Все исходные данные задаются с клавиатуры. КТО ПОМОЖЕТ 30 В ПАСКАЛЕ

Не уверен что правильно, так как не понял что требуют.
program chisla;var a,b,c,d,e,f,i,r: integer;beginwrite(Введите первое число:);readln(a);write(Введите второе число:);readln(b);write(Введите третье число:);readln(c);writeln(Сумма трех чисел:,(a+b+c));write(Стоимость перчаток:);read(e);write(Стоимость портфеля:);read(f);write(Стоимость галстука:);read(i);r:=(a+b+c)-(e+f+i);writeln(Кол-во денег оставшиеся после покупки:,r);end.