Даны два неравных...

Тема в разделе "Информатика", создана пользователем volya, 11 мар 2010.

  1. volya

    volya New Member

    Даны два неравных числа C и D число D заменить частными этих чисел, если C больше числа D на5
     
  2. Lesnik

    Lesnik New Member

    Var c,d,a:real;
    begin
    read(c,d);
    if c-d=5 then do begin
    a:=c/d; d:=d/с; write (a,d); 
    end; 
    end.
     

Поделиться этой страницей

Наша группа