Запрашивайте у пользователя размер наследства, которое вы бы хотели получить ( в долларах), и сумму денег , которую вы собираетесь тратить в месяц.выведите на экран время (в годах), на которые хватит этого наследства
Program nasledstvo; var all, inmonth, time:real; //all - размер наследства, inmonth - затраты в месяц begin readln(all, inmonth); time=(all/inmonth)/12; wiriteln(time); end.
var all, inmonth, time:real; //all - размер наследства, inmonth - затраты в месяц
begin
readln(all, inmonth);
time=(all/inmonth)/12;
wiriteln(time);
end.