profile
Опубликовано - 6 месяцев назад | По предмету Информатика | автор 152region

Написать алгоритм для паскаля.
Напечатать минимальное число, больше 200, которое нацело делится на 17.

  1. Ответ
    Ответ дан Курчик
    var   a: integer;   
    begin   
    while a < 200 do     
         a := a + 17;
    writeln('Минимальное число, делящееся на 17 и большее 200 - ',a);
    end.

    Вот такой коротенький кодик :) 
    0

    1. Ответ
      Ответ дан 152region
      Спасибо!!!! Блин, знаю что легкотня, но после практики у меня мозги вообще не варят.... Учёба только вот как 2 неели назад началась....
      0

    2. Ответ
      Ответ дан Аккаунт удален
      Спасибо отмечают кнопочкой, а размер "спасибо" - числом звездочек
      0

    3. Ответ
      Ответ дан Аккаунт удален
      И спасибо не этому ответу ставь, а нижнему)
      0

    4. Ответ
      Ответ дан Аккаунт удален
      Этот ответ тоже условно верный!
      0

    5. Ответ
      Ответ дан Аккаунт удален
      Ну как бы да, но на старых версиях FPC не верный.
      0

  2. Ответ
    Ответ дан Аккаунт удален
    var
      n: integer;

    begin
      n := 201;
      while (n mod 17) <> 0 do n := n + 1;
      Writeln(n)
    end.

    Результат выполнения программы:
    204

    0