Вопрос по информатике:
Помогите плиииз!!!! Оператор цикл с параметром! 1.Найти сумму и произведение каждого третьего числа последовательного целочисленного ряда от 3 до 18, т.е. ряд: 3, 4, 5, 6, 7, 8,..., 17, 18. Сумма=5+8+...
2. Сбербанк взял на 5 лет на депозит 10000 рублей под 10% годовых в 2010 году у человека деньги. Сколько денег вкладчик получит через 5 лет. Вывести сумму на каждый год с учетом %. В формате: год - сумма.
Трудности с пониманием предмета? Готовишься к экзаменам, ОГЭ или ЕГЭ?
Воспользуйся формой подбора репетитора и занимайся онлайн. Пробный урок - бесплатно!
- 17.09.2018 08:42
- Информатика
- remove_red_eye 5201
- thumb_up 24
Ответы и объяснения 1
PascalABC.Net
1)
var
i,s,p : integer;
begin
s := 0;
p := 1;
for i := 3 to 18 do
if (i-2) mod 3 = 0 then
begin
s := s + i;
p := p * i;
end;
writeln ('s=',s);
writeln ('p=',p);
end.
2)
Программа не зачисляет процент в первый год, если нужно, чтобы зачислила, то поменяй местами строки вывода и присвоения внутри цикла
var
i : integer;
s : real;
begin
s := 10000;
for i := 2010 to 2015 do
begin
writeln (i,'-',s);
s := s * 1.1;
end;
end.
- 18.09.2018 04:41
- thumb_up 46
Знаете ответ? Поделитесь им!
Есть сомнения?
Не нашли подходящего ответа на вопрос или ответ отсутствует? Воспользуйтесь поиском по сайту, чтобы найти все ответы на похожие вопросы в разделе Информатика.
Трудности с домашними заданиями? Не стесняйтесь попросить о помощи - смело задавайте вопросы!
Информатика — наука о методах и процессах сбора, хранения, обработки, передачи, анализа и оценки информации с применением компьютерных технологий, обеспечивающих возможность её использования для принятия решений.