Задание:
ПОМОГИТЕ ПОЖАЛУЙСТА НАПИСАТЬ ПРОГРАММУ для решения этой задачи В ПАСКАЛЕ, ПЛИЗ) Известно, что Покупатель приобрел а кг яблок по цене в руб. И с кг груш по цене d руб. Покупатель имеет S рублей. Напишите программу, которая определяет, хватит ли у покупателя средств на данную покупку?
Решение:
Var a,d,s: integer; beginwriteln ('Введите стоимость яблок, груш'); readln (a,d); writeln ('Введите количество денег'); readln (s); if (a+d) <= S) then writeln ('Денег хватит') elsewriteln ('Денег не хватит'); readlnend.
Знаете другой ответ?