Язык программирования Паскаль

задачи по прогроммированию

Помогите чайнику!!!
в чём ошибка:
var;a,d interger;
begen;
wraite(введите число конфет и их цену );
readilen(a);
readilen(d);
wraitlen(сумма конфет,a*d);
esle of(a;=0);then begen;wraite(ошибка);
readelen;
end.

Извините, но это — не паскаль. В паскале большинства слов нет. Возьмите учебник и внимательно проверьте все слова на английском. Потом прочитайте правила и примеры для каждого
var
integer
begin
end
write
readln
if....then...else
Обратите внимание не только на написание слов, но и синтаксические знаки
. : ; ,
В каждом случае есть конкретные знаки, подлежащие использованию.
Изучение языка лучше всего сопровождать отладкой программ на компьютере
Лучше всего установить на компьютер среду отладки программ
В Интернете, например, есть среда "Турбопаскаль", адаптированная для Windows.
В своих рекомендациях я предполагаю, что в школе Вам объяснили, что такое алгоритм и как он реализуется в помощью языка программирования.

var;a,d interger;
begen;
write(введите число конфет и их цену );
readln(a);
readln(d);
write(сумма конфет,a*d);
of(a=0);then begen;wraite(ошибка); end;
readelen;
end.

то есть..
var;a,d integer;
begin;
write(введите число конфет и их цену );
readln(a);
readln(d);
write(сумма конфет,a*d);
of(a;=0);then begen;wraite(ошибка); end;
readln;
end.

У меня стойкое ощущение, что вы пытаетесь сдать конкретное задание вообще ничего не читая... Исправила синтаксис.. Не выдержала, немного подправила алгоритм.
var a,d: integer;
begin
write('введите число конфет и их цену' );
readln(a);
readln(d);
if (a:=0) then writeln('ошибка') else writeln('стоимость конфет ',a*d);
readln;
end.

в чем ошибка
var a,d: of integer;
begin
writeln('введите 2 в числа которыми надо проделать операцию' );
readln('a');
readln('d');
whaile a>1 do
write('ошибка');
end;
write(какие математичиские действия надо провести?если сложить введите 1 если минусовать то 2 делить 3 умножать 4)
readln(c);
if (c:=1); then write(a+d); esle
if(c:=2);tnen write(a-d); esle
if(c:=3);tnen write(a div d);
if(c:=)tnen write(a*d);
end.