помогите пожалуйста) преобразуйте вес заданный в пудах (1-50 пудов), в килограммы. Формуа: 1пуд=16,2 кг

Question

program 111; 
uses crt; 
var 
x,y,s: real; 
begin 
clrScr; 
writeln('vvedite pudy'); 
readln(x); 
y:=16.2; 
s :=x*y; 
writeln(s,'kg'); 
readKey; 
end. 
Подскажите пожалуйста в чем ошибка.

я знаю можно было написать s=x*16.2 но выводит все равно значения 1,000000000Е+01 КГ

ДАЖЕ ЕСЛИ 16,2 ВЫДАЕТ НЕ ПРАВИЛЬНЫЙ ОТВЕТ

Татьяна Локтионова · Accepted Answer

все правильно. Можно было ограничиться 2 значениями. Х, S.

Татьяна Моисеева · Answer

Код правильный, в назвение программы введите сначала буквы а потом цифры (т. е. program z111, а не program 111)

Марина Ракова · Answer

форматный вывод writeln(s:5:2,'kg');