Информатика

Витушка

31 октября, 18:47

Создать программу вычисления доходов по вкладу. Исходным данным является

1) величина вклада

2) срок вклада

3) процентная вставка

Исходные данные вводятся с клавиатуры. Формула для расчет дохода по вкладу = (величина вклада * процентная вставка / 100) / 365 * срок вклада

Программа:

program a1;

var

p, s, v, d: real;

begin

write (' Процентная вставка : ') ;

readln (p) ;

write (' Величина вклада : ') ;

readln (v) ;

write (' срок вклада : ') ;

readln (s) ;

d : = (v * p / 100) / (365 * s) ;

writlen (' Доход равен : ', d:0:2) ;

end.

переведите на обычный кумир-алг, нач, кон ...