Poroskun
?>

Створити список з 10 випадкових елементів(від -10 до 10) Знайти суму, кількість та середнє арифметичне окремо додатніх та від‘ємних елементів спискку

Информатика

Ответы

Reutskii-Kirilovskii1625

Нет не успеет

Объяснение:

program kopilka;

uses crt;

var x, c, p, y:real; i, m:integer; {x - деньги на счёте, с - цена автомобиля, p - процентная ставка, y - срок вклада в годах; m - срок вклада в месяцах, i - счётчик цикла}

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; {каждый месяц сумма на вкладе увеличивается на p процентов, причем в каждом следующем месяце происходит капитализация вклада, и процент начисляется на возросшую за предыдущий месяц сумму}

if x<c then write('Вы накопили ',x:6:2,' рублей, это меньше запланнированной суммы в ',c:6:2,' рублей')

else write('Ваша цель по накоплению ',c:6:2,' рублей достигнута: вы накопили ',x:6:2,' рублей') ; {здесь мы сравниваем накопленную за m месяцев сумму с желаемой суммой с и, в зависимости от результата, делаем вывод}

readln;

end.

serkan777

Відповідь:

#include <iostream>

using namespace std;

int main(){

setlocale(LC_ALL, "Rus");

int k,f;

cout << "Введите число k: ";

cin >> k;

cout << "Введите число f: ";

cin >> f;

cout << "Сумма k + f = " << k + f << endl;

cout << "Разность k - f = " << k - f << " ,f - k = " << f - k << endl;

cout << "Произведение k * f = " << k * f << endl;

cout << "Частное k % f = " << k % f << " , f % k = " << f % k << endl;

return 0;

}

Ответить на вопрос

Поделитесь своими знаниями, ответьте на вопрос:

Створити список з 10 випадкових елементів(від -10 до 10) Знайти суму, кількість та середнє арифметичне окремо додатніх та від‘ємних елементів спискку
Ваше имя (никнейм)*
Email*
Комментарий*

Популярные вопросы в разделе

Мануэлла
sergeev-alp5
lenalevmax7937
maksimovskiy7657
Nataliatkachenko1
kazimov832
kim-1971
sde19755511
Petrovich
Varezka86179
vovkiv7864
nopel91668
Nonstop788848
borisrogovpr3407
apromovich1