Прості відсотки
Pascal Ввід-вивід
формула + вивід
Блок-схема за ДСТУ
Вихідний код
program SimpleInterest;
var p, r, t, interest: real;
begin
readln(p, r, t);
interest := p * r * t / 100;
writeln(interest);
end.формула + вивід
program SimpleInterest;
var p, r, t, interest: real;
begin
readln(p, r, t);
interest := p * r * t / 100;
writeln(interest);
end.