2. клоуны бом и бим нарисовали карту, на которой указали, где зарыты сокровища. они точно помнят, какой - id869302220221207 от dominocos 07.12.2022 05:35

Question

Информатика: 2. клоуны бом и бим нарисовали карту, на которой указали, где зарыты сокровища. они точно помнят, какой придумали маршрут. но не помнят, где хотели отметить точку старта. клоунам, если известен следующий маршрут от старта до места с сокровищами: 3 шага на север, 2 шага на восток, 1 шаг на север, 3 шага на запад.

dominocos · Accepted Answer

Решение, что называется, в лоб (далеко, очень далеко, не самое лучшее): var s,k1,k5,k10,k50,k100,k500,k1000,k10000:integer; begin write( s = ); readln(s); k1:=0; k5:=0; k10:=0; k50:=0;  k100:=0; k500:=0; k1000:=0; k10000:=0; while s =10000 do begin s:=s-10000; k10000:=k10000+1; end; while s =1000 do begin s:=s-1000; k1000:=k1000+1; end; while s =500 do begin s:=s-500; k500:=k500+1; end; while s =100 do begin s:=s-100; k100:=k100+1; end; while s =50 do begin s:=s-50; k50:=k50+1; end; while s =10...

MOGZ ответил