Па С++ сделал, а на Паскале ошибка.

[DanielDefo]

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

арифметическая операция - (a+b)*sizeof(c)
арифметическая операция - (a+b) в степени 1/c
логическая операция - a<b
битовая операция - a>>=5
Переделывание - из integer сделать string.
Вот собственно что у меня получилось на С++:

#include<iostream.h>
#include<math.h>
void main()
{int a,b;
short c;
cout<<"VVEDITE a,b,c:\n";
cin>>a>>b>>c;
c=(a+b)*sizeof(c);
cout<<"Rezultat pervoy arifmeticheskoy operacii: "<<c;
c=pow((a+b),1/c);
cout<<"\nRezultat vtorou arifmeticheskoy operacii: "<<c;
c=(char)c;
c=a<b;
cout<<"\nRezultat logicheskoi operacii: "<<c;
a>>=5;
cout<<"\nRezultat bitovoi operacii: "<<a;
}


А вот что у меня получилось на Паскале:

program zadacha7_2;
uses wincrt;
var
a,b,c:real;
y:boolean;
begin
write('VVEDITE a,b,c:');
read(a,b,c);
c:=(a+b)*sizeof(c);
writeln('Rezultat pervoy arifmeticheskoy operacii: ',c);
c:=exp(1/c*ln(a+b));
writeln('Rezultat vtorou arifmeticheskoy operacii: ',c);
y:=a<b;
writeln('Rezultat logicheskoi operacii: ',y);
y:=a>=5;
writeln('Rezultat bitovoi operacii: ',y);
end.


Помогите пожалуйста найти и исправить ошибки. Заранее спасибо.

[999Crow999]

program zadacha7_2;
uses wincrt;
var
a,b,c:real;
y:boolean;
begin
write('VVEDITE a,b,c:');
read(a,b,c);
c:=(a+b)*sizeof(c);
writeln('Rezultat pervoy arifmeticheskoy operacii: ',c);
c:=exp(1/c*ln(a+b));
writeln('Rezultat vtorou arifmeticheskoy operacii: ',c);
y:=a<b;
writeln('Rezultat logicheskoi operacii: ',y);
y:=a>=5;
writeln('Rezultat bitovoi operacii: ',y);
end.

вообще-то просто crt;

только зачем он вам, если вы не применяете его......