profile
Опубликовано 4 года назад по предмету Информатика от nikki16

вывести на экран ряд чисел 1/3, 3/6, 5/9...(12 чисел)

 

  1. Ответ
    Ответ дан HRAshton
    var i, j, k: integer;
    begin
         j := 1;
         k := 3;
         while (i < 12) do
         begin
              writeln(j, '/', k, '=', j/k:1:3);
              j := j + 2;
              k := k + 3;
              inc(i);
         end;
    end.
    1. Ответ
      Ответ дан nikki16
      спасибо конечно большое, но у меня такое не примут.