Известно, что X кг конфет стоит A рублей. Определить, сколько стоит

Известно, что X кг конфет стоит A рублей. Найти, сколько стоит 1 кг и Y кг этих же конфет

Задать свой вопрос
1 ответ
var
X, A, Y: real;

begin
write(X = );
readln(X); lt;-- Вводим вес конфет
write(A = );
readln(A); lt;-- Вводим цена конфет
A := A / X; lt;-- Цена 1 кг конфет
writeln(Цена 1 кг конфет: , A:0:2, рублей);
write(Y = );
readln(Y); lt;-- Вводим другой вес конфет
A := A * Y; lt;-- Цена Y кг конфет
writeln(Стоимость , Y, кг конфет: , A:0:2, рублей);
readln
end.
, оставишь ответ?
Имя:*
E-Mail:


Последние вопросы

Добро пожаловать!

Для того чтобы стать полноценным пользователем нашего портала, вам необходимо пройти регистрацию.
Зарегистрироваться
Создайте собственную учетную запить!

Пройти регистрацию
Авторизоваться
Уже зарегистрированны? А ну-ка живо авторизуйтесь!

Войти на сайт