1) вывести трехзначные числа сумма цифр которых простое число pascal.

2) Дана последовательность 5,9,13,17, ... Составте программу для определения числа слагаемых, сумма которых равна 324.

3) Сумма 10000 рублей положена в сберегательный банк при этом прирост состовляет 5% годовых. Составте программу определяюшую через какой промежуток времени первоночальная сумма увиличиться в двое.

Язык програмирования Pascal.

Question

Андроний

30 марта, 05:53

+3

Ответы (1)

Знаете ответ?

Фессалоникия · Answer 1

Задача №2.

program task2;

var s, n, q:integer;

begin

n:=5;

s:=0;

q:=0;

while s324 do begin

s+=n;

q+=1;

n+=4;

end;

writeln (q) ;

end.