Он не мог просто так перестать работать. Вы проводили с ним эксперименты? Не сюда обращаетесь, берите форумы типа 4пда.
Это называется бутлуп, когда телефон на логотипе зависает, лечится перепрошивкой (обычно).
Годовая ставkа-0,07
выплата 41000
общая сумма 370000
kол-во лет выплат 6,1
Замёрзший, ледяной, влажный.
Var a,s:integer;
begin
s:=1;
for a:=1 to 20 do begin
if (a mod 3 = 0) and (a mod 5 = 0) then s:=a*s;
end;
writeln('произведение чисел кратных 5 и 3 ==> ', s);
end.