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

Var

kol: real;

cena: real;

stoim: real;

Begin

Writeln ('Здравствуйте, сколько бутылок воды вы хотите приобрести?') ;

Readln (kol) ;

Writeln ('по какой цене?') ;

Readln (cena) ;

Stoim: = cena * kol;

Writeln ('с вас', stoim, '!') ;

Readln;

End.