Question

В паскале хватитли вам денег на покупку 10кг соли по цнене m рублей за килограм если у вас k рублей денег

Answer 1

programm rubli;

var: k,m: real;

begin

readln(m);

readln(k);

if (m*10<k) or (m*10=k) then writln('Да')

    else writln('Нет')

end

Answer 2

Чтобы узнать, хватит ли вам денег на покупку 10 килограмм соли по цене m рублей за килограмм, вы можете использовать следующий код на Pascal:

pascalCopy code
program CheckSaltPurchase;
var
  k, m, totalCost: real;
  saltWeight: integer;
begin
  // Вводим стоимость соли за килограмм (m) и количество денег (k)
  write('Введите стоимость соли за килограмм (в рублях): ');
  readln(m);
  write('Введите количество денег (в рублях): ');
  readln(k);

  // Вычисляем общую стоимость 10 килограмм соли
  saltWeight := 10;
  totalCost := m * saltWeight;

  // Проверяем, хватит ли денег на покупку
  if k >= totalCost then
    writeln('Денег хватит на покупку 10 килограмм соли.')
  else
    writeln('Денег не хватит на покупку 10 килограмм соли.');
end.

Этот код позволяет вам ввести стоимость соли за килограмм (m) и количество денег (k) и затем проверяет, хватит ли вам денег на покупку 10 килограмм соли по указанной цене за килограмм. Результат будет выведен на экран.