• СРОЧНО!!!!!!!!!!!!!!!!!!!!!   Решите задачу, используя язык программирования Паскаль: Напишите программу вычисления стоимости покупки, состоящей из нескольких карандашей, линеек и тетрадей. Их количество и цену задать вводом. Ответ вывести в виде:
    Сумма к оплате: … руб … коп.

Ответы 1

  • vark,kc,ks, r,rc,rs, l,lc,ls: Integer;Summa: Integer;beginWriteLn('Введите цену карандаша'); ReadLn(kc);WriteLn('Введите цену ручки'); ReadLn(rc);WriteLn('Введите цену линейки'); ReadLn(lc);WriteLn('Введите кол-во карандашей'); ReadLn(k);WriteLn('Введите кол-во ручек'); ReadLn(r);WriteLn('Введите кол-во линеек'); ReadLn(l);ks:= k * kc; // цена карандашейrs:= r * rc; // цена ручекls:= l * lc; // цена линеекSumma:= ks + rs +ls; // общая цена всех 3-хWriteLn('Сумма = ', Summa;ReadLn;end.
  • Добавить свой ответ

Войти через Google

или

Забыли пароль?

У меня нет аккаунта, я хочу Зарегистрироваться

How much to ban the user?
1 hour 1 day 100 years