Uses crt;var i,j,k:0..9; kol:integer;beginkol:=0;For i:=1 to 9 do For j:=0 to 9 do For k:=0 to 9 do if (i+j+k)=10 then inc(kol);writeln('Result: ',kol);end.
0,0(0 оценок)
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
