Написать программу вычисления произведения и частного двух целых чисел

Var a, b, c, d:integer;

begin

writeln ('Введите первое число') ; readln (a) ;

writeln ('Введите второе число') ; readln (b) ;

c: = a * b;

d: = a / b;

writeln ('Произведение чисел = ', c) ;

writeln ('Частное чисел = ', d) ;

end. Я оч давно не писал на Pascal так что особо не уверен в том что написал, но проверь : D