Учеба и наука

Паскаль простая задача - вопрос №217335

Простая задача по паскалю. «из 3 произвольных слов вывести на экран слово с минимальной длинной». Извините я не программист, но наше дебильное образование… И зачем мне это нужно?

март 3, 2012 г.

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

  • Илья - аватарка

    Илья

    31-й в Учебе и науке

    program m;
    var
    a1,a2,a3: String;
    i1,i2,i3: Integer;
    begin
    readln(a1);
    readln(a2);
    readln(a3);
    i1:=Length(a1);
    i2:=Length(a2);
    i3:=Length(a3);
    if i2<i1 then
    begin
      i1:=i2;
      a1:=a2
    end;
    if i3<i1 then
      a1:=a3;
    writeln(a1);
    readln(a1);
    end.

    Интересно, есть причины почему люди не отказываются от «такого» образования?

    март 10, 2012 г.

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

Решено

Как вы понимаете смысл фразы...

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

Учеба и наука