• Помогите пожалуйста!нам на уроке информатики дали задание написать программу Паскаль на нахождения объёма шара.с этим я справилась.но вот на дом нам задали добавить в программу условие "Если объём больше 10,то пиши "шар большой." ".И сказано приписать к программе см или м кубические.Где и как их нужно записать?

    rogram v_shara;
    const pi=3.14;
    var V,R:real;
    begin
    writeln('Данная программа будет вычеслять объём шара');
    writeln('Введите радиус в см c клавиатуры: ');
    read(R);
    V:=(4/3)*pi*(R*R*R);

    writeln('Объем шара при радиусе ',R, ' равен ', V, 'см' );
    if V<10 then writeln ('шар большой');
    writeln('программа выполнена');
    end.

Ответы 1

  • У Вас уже написано условие. Осталось только поменять знак, на противоположный. По - поводу сантиметров и кубических метров. Где Вы выводите Объем шара, после переменной V, замените см на то, что Вам необходимо.Если что-то не правильно в моем ответе, или не понятно, пишите в комментариях к данному ответу.
  • Добавить свой ответ

Еще вопросы

Войти через Google

или

Забыли пароль?

У меня нет аккаунта, я хочу Зарегистрироваться

How much to ban the user?
1 hour 1 day 100 years