Фермер выращивает картофель и свеклу. Фермер продает овощи на базу N килограмм ка
Фермер выращивает картофель и свеклу. Фермер
продает овощи на базу N килограмм картофеля по X рублей и
столько же килограмм свеклы по Y рублей. Напишите программу,
которая выводит прибыль фермера от продажи.
Вход: N – целое положительное число от 1 до 50, X – стоимость
одного килограмма картофеля в диапазоне от 10 до 50 рублей; Y –
стоимость одного килограмма свеклы в диапазоне от 5 до 15
рублей. Первым задается число N, затем на следующей строке
число X, на следующей строке число Y.
Выход: S – прибыль продажи
Гость
Ответ(ы) на вопрос:
Гость Var
N, X, Y, S: real;
begin
write('Кол-во килограмм: ');
readln(N);
write('Стоимость одного килограмма кратофеля: ');
readln(X);
write('Стоимость одного килограмма свеклы: ');
readln(Y);
S := N * X + N * Y;
writeln('Прибыль: ', S);
end.
Не нашли ответ?
Похожие вопросы