Форум » Обработка числовых последовательностей » [C4] №40 » Ответить
[C4] №40
max: Здравствуйте, хотелось бы узнать, является ли мое решение эффективным или на егэ сняли бы балл за большое кол-во вложенных циклов? program c4_40; var i,k,t,sum,n: integer; a1,a2,a3: array[1..9] of string; a: string; begin for i:=1 to 9 do readln(a1); for i:=1 to 9 do readln(a2); for i:=1 to 9 do readln(a3); readln(n); sum:=0; for i:=1 to n do begin readln(a); if a=a3[1] then sum:=sum+10; for k:=1 to 9 do begin if a=a1[k] then sum:=sum + k; if a=a2[k] then sum:=sum + k +10; for t:=2 to 9 do begin if a=a3[t]+' '+a1[k] then sum:=sum +t*10+k; if a=a3[t] then sum:=sum +t*10; end; end; end; writeln(sum); end.
Ответов - 1
Поляков: max пишет: хотелось бы узнать, является ли мое решение эффективным или на егэ сняли бы балл за большое кол-во вложенных циклов? Согласно критериям для этой задачи, такое решение следует признать эффективным, поскольку объем используемой памяти не зависит от размера входных данных.
полная версия страницы