Нужно решить 3 этих задания на паскале,даю 50 баллов.Оооочень нужно,ребят,помогите

Program bank;
const
tax = 0.18;

var
summ, amount : real;
period : real;

begin
write(Введите сумму вклада: );
readln(summ);
write(Введите срок вклада (мес): );
readln(period);
period := period/12;
amount := summ * period * tax;
writeln(Процент по вкладу составит: , amount:7:2);
end.

пример работы программы:
Введите сумму вклада: 1000
Введите срок вклада (мес): 18
Процент по вкладу составит: 270.00

Оцени ответ
Подпишись на наш канал в телеграм. Там мы даём ещё больше полезной информации для школьников!

Загрузить картинку