Написать код на языке программирование С в CodeBlocks. 1)Найти все натуральные числа из промежутка от 1 до 200, у которых сумма
делителей равна S (S вводить с клавиатуры).
2) Найти все такие тройки натуральных чисел x, y и z с интервала от 1 до
20, для которых выполняется равенство:

1) 

var

s: string;

begin

s: ='пробел';

writeln(s);

delete(s,4,1);

insert('д',s,4);

writeln(s);

end.

2)

var

i: integer;

a,b: string;

begin

readln(a);

b: ='';

for i: =1 to length(a) do

b: =b+a[i]+' ';

writeln(b);

end.

3)

var

a: string;

begin

readln(a);

if a[2]=a[4] then writeln('равны')

else  writeln('не равны');

end.

такой адресс получается

for a : = 1 to 20 do

begin

    writeln(a,"^2 = ", a*a);

end

или

a: = 1;

repeat

    writeln(a,"^2 = ", a*a);

    a : = a + 1;

until a > 20;

думаю, что дикий заяц, он то серый, то белый, то кремовый, в течении года