ТОВАРИЩ (*-*) Найти все целые двузначные числа, кратные 9 и заканчиваются цифрой 3. Написать программу на языке Паскаль

C#:
{
double x = Convert.ToDouble(Console.ReadLine());
double y = Convert.ToDouble(Console.ReadLine());

if ( x > y)
{
x = x / 0,9;
}
else if (y > x)
{
y = y / 0,9;
}
else Console.WriteLine("Числа одинаковые \n");
 Console.WriteLine("x = {0}, y = {1}" , x, y);
}

надеюсь, что устроит
более-менее понятно, можно разобраться

на паскале:
begin
var x, y: double;
readln(x);
readln(y);

if x > y then
x := x div 0,9;
else if y > x then
y := y div 0,9;
else writeln("числа одинаковые");
writeln("x = ", x, "y = ", y);

на паскале мб чутка неверно написано

var

 i, n:integer;

 price:real;

begin

  n := 20;

  price := 20.4;

  for i := 1 to n do

    writeln('Стоимость ', i:3, ' ед. товара составляет ', price * i:8:2, ' руб.');

end.

 

 

//вторая задача

var

  i, f, n:integer;

begin

  f := 453;

  n := 10;

  writeln('фунты    граммы');

  for i := 1 to n do

    writeln(' ', i:2, i * f :11);

end.

 

//третья задача

var

  i, n:integer;

  k:real;

begin

  n := 20;

  writeln('Введите курс '); readln(k);

  writeln('доллары    рубли');

  for i := 1 to n do

    writeln('  ', i:2, i * k:13:2);

end.