В чем ошибка??известны площадь и одна из сторон прямоугольника. найти вторую. в паскалеprogram F – VAR a, s: integer – b: real – begin write 'введите площ

25 Январь 2012



в чем ошибка??
известны площадь и одна из сторон прямоугольника. найти вторую. в паскале



program F;
 VAR a,s: integer; b: real;
 begin
 write (‘введите площадь прямоугольника’);
 read (s);
 write (‘введите сторону прямоугольника ‘);
 read (a) ;
 b:=s/a;
 writeln(‘вторая сторона прямоугольника равна ‘) ;
 end.

  • Маша – растеряша :)

    program F;
     VAR a,s: integer; b: real;
     begin
     write (‘введите площадь прямоугольника ‘);
     read (s);
     write (‘введите сторону прямоугольника ‘);
     read (a) ;
     b:=s/a;
     writeln(‘вторая сторона прямоугольника равна ‘, b:5:2) ;
     end.









Информатика

Комментарии закрыты.