Учеба и наука

(ПАСКАЛЬ) определить цифры С, Т... - вопрос №874273

(ПАСКАЛЬ) определить цифры С, Т и О и вывести их на экран. cto+cot=toc CTO=C*100+T*10+0

декабрь 15, 2013 г.

  • Всего ответов: 1

  • Валентина - аватарка

    Валентина

    3-й в

    program pr;

    var c,t,o:integer;

    begin

    for c:=1 to 9 do

    for t:=1 to 9 do

    for o:=0 to 9 do

      if c*100+t*10+o+c*100+o*10+t=t*100+o*10+c 

        then writeln('CTO=',c,t,o);

    readln

    end. 

    Буду благодарна, если отметите 

    декабрь 15, 2013 г.

Похожие вопросы

Может ли шар радиуса R...

июнь 11, 2013 г.

Учеба и наука