Question

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

Answer 1

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

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

Answer 2

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

Answer 3

И спасибо не этому ответу ставь, а нижнему)

Answer 4

var
  n: integer;

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

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