Предмет: Информатика,
автор: azdad1995p6ie71
1)вывести трехзначные числа сумма цифр которых простое число pascal.
2)Дана последовательность 5,9,13,17,..... Составте программу для определения числа слагаемых, сумма которых равна 324.
3)Сумма 10000 рублей положена в сберегательный банк при этом прирост состовляет 5% годовых. Составте программу определяюшую через какой промежуток времени первоночальная сумма увиличиться в двое.
Язык програмирования Pascal.
Ответы
Автор ответа:
0
Задача №2.
program task2;
var s,n,q:integer;
begin
n:=5;
s:=0;
q:=0;
while s<>324 do begin
s+=n;
q+=1;
n+=4;
end;
writeln(q);
end.
program task2;
var s,n,q:integer;
begin
n:=5;
s:=0;
q:=0;
while s<>324 do begin
s+=n;
q+=1;
n+=4;
end;
writeln(q);
end.
Похожие вопросы
Предмет: Математика,
автор: aruunaa
Предмет: Алгебра,
автор: poko26867
Предмет: Қазақ тiлi,
автор: iwanteat86
Предмет: Химия,
автор: катя1776
Предмет: Алгебра,
автор: Аноним