Не, не получится накопить
Объяснение:
program kopilka;
uses crt;
var x, c, p, y:real; i, m:integer;
begin
clrscr;
write ('Введите начальную сумму вклада, рублей: ') ;
readln(x);
write ('Введите желаемую сумму накопления, рублей: ') ;
readln(c);
write ('Введите срок накопления, лет: ') ;
readln(y);
m:=round(y*12);
write ('Введите ежемесячно начисляемый процент (%) : ') ;
readln(p); p:=p/100;
for i:=1 to m do
x:=x+x*p;
if x<c then write('Вы накопили ',x:6:2,' рублей, это меньше запланнированной суммы в ',c:6:2,' рублей')
else write('Ваша цель по накоплению ',c:6:2,' рублей достигнута: вы накопили ',x:6:2,' рублей') ;
readln;
end.
1.А)Перевод "Ctrl+D" на русский. Дублирование выполняется по нажатию горячей клавиши (по умолчанию Ctrl-D) или через контекстное меня, кнопка.
б)удалить файл без перемещения в корзину
в)очистка журнала
Г)Сохранение в памяти в обычном режиме, в инженерном режиме и в режиме "Програмист"
2. Для выполнения этой простейший операции потребуется команда Редактирование-Свободное трансформиния (сочетание горяших клавиш Ctrl+T ). Вокруг содержимое слоя появится ограничительная рамка,на углах и сторонах имеются маркеры. Изменение размеров осуществляется путем воздействия на эти маркеры.
3. правда не знаю извините
4. реально не знаю извините