задачи по теме''оператор выбора''(Delphi 7)

[matrix8325]

1.Написать программу,которая бы по введенному номеру еденицы измерения(1-киллограм,2-миллиграм,3-грамм,4-тонна,5-центнер) и массе М выдавала бы соответствующее значение массы в килограммах.
2.Составить программу,позволяющую по последней цифре данного числа оределить последнюю цифру куба этого числа.

[Sazary]

Покажите наработки.
Легкие ж задачи.
Вторая:

procedure TForm1.Button1Click(Sender: TObject);
var
N : integer;
a : integer;
begin
N := StrToInt(Edit1.Text);
a := N*N*N mod 10;
ShowMessage(IntToStr(a));
end;