Pascal - Написание программы на вычисление!

[dimwow]

Подсчитать стоимость оплаты для каждой плиты за месяц!
Допустим:
Стоимость оплаты за электрическую плиту - 1.21 руб. (1 квЧ)
Стоимость оплаты за газовую плиту - 1.25 руб. (1 квЧ)

Нужно чтобы программа запрашивала у меня тип плиты.
Если эл.плита, то 1 (Ввести нужно)
Если газ.плита, то 2 (Ввести нужно)

Обязательное использование (if) оператора...

[Serge_Bliznykov]

var tipPlita : integer;
....
begin
.....
  repeat
    Write('Введите тип плиты (эл.плита - введите 1, газ.плита - введите 2): ');
    ReadLn( tipPlita );
 until tipPlita in [1,2];
 if tipPlita=1 then begin
    { вычисления для эл.плиты }
 end
 else begin
    { вычисления для газ.плиты }
 end;

[dimwow]

Спасибо, все получилось