tekst shpargalki sostavliaet 50*50=2500 simvolov-2500 bait.
da + eshe 0,3*2500=750.
vsego 2500+750=3250 bait.
Ответ дал: Гость
var s,s1: string; n,i: integer; begin readln(s); readln(n); for i: =1 to n do begin insert(s[1],s1,length(s1)+1); delete(s,1,1); end; s: =s+s1; writeln(s); end.
Ответ дал: Гость
совершенное число это число равное сумме своих делителей отличных от самого числа
var i, s,j : integer;
begin for i : = 5 to 200 do begin s : = 0; for j : = 1 to i div 2 do if (i mod j = 0) then s : = s + j; if s = i then writeln(i); end; end.
Популярные вопросы