Использовать Робот
алг
нач
нц пока слева свободно
влево
кц
нц пока слева стена
закрасить
вверх
кц
вверх
нц пока слева стена
закрасить
вверх
кц
вверх
влево
влево
вниз
нц пока справа стена
закрасить
вниз
кц
вниз
нц пока справа стена
закрасить
вниз
кц
<span>кон</span>
Жилой, есть комнаты, окна, крыша,этажи, стенки, ступеньки, двери
using System;
class Program
{
static void Main() {
string s=Console.ReadLine(),dic="abcdefghijklmnopqrstuvwxyz";
int k=0;
for(int i=0;i<dic.Length;i++)
{
for(int j=0;j<s.Length;j++)
if(s[j]==dic[i])
k++;
if(k!=0)
{
Console.WriteLine(dic[i].ToString()+" "+k.ToString());
k=0;
}
}
}
}
На 80 секунд
-------------------
20*1024 = 20480байт
1024/8 = 128байт
20480/128 = 160с
2048/8 = 256байт
20480/256 = 80с
160-80 = 80с
Var
a,sum:integer;
begin
Read(a);
while (a > 0) do begin
sum += a mod 10;
a := a div 10;
end;
Writeln(sum);
end.