НС
Нина Смирнова

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

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.

Слава
Слава

Лишняя переменная y. Можно написать s:=x*16.2;
или вообще x:=x*16.2;
Экономия памяти - 2 переменных real.

Используйте форматный вывод: writeln('Введённый вес соответствует ', x:2:3,' кг. ');

Похожие вопросы
сколько я буду весить при остановке земли ???При весе 50 кг
Напечатать таблицу соответствия между весом в фунтах и весом в кг для значений от 1 до 10 фунтов с шагом 1 (1 фунт = 400
как похудеть? мне 13 вес у меня 50 кг
помогите пожалуйста) преобразуйте вес заданный в пудах (1-50 пудов), в килограммы. Формуа: 1пуд=16,2 кг
Нормально ли при росте165 весить 50 кг?
немецкая овчарка 10 месяцев вес около 50 килограмм....
по чему мешок весом 50 кг труднее поднять а девушку весом 50 кг легко
дано 50 арбузов вес 1-го A кг вес 50-гр В кг определить вес 2-го B. Определить вес 2-го арбуза
что можно вытянуть из человека весом 50 кг?
Сложно ли поднять девушку на руки если она весит 50 килограмм?