Составьте многоуровневую иерархическую файловую структуру вашего персонального компьютера.

Var x,y,z: real;
      t: integer;
begin writeln('введите х и у');
          readln(x,y);
          z:=sqrt(sqr(x)-sqr(y));
          t:=0;
          while (z>0,1) do
          begin t:=t+1;
                    z:=0,98*z;    {если 2% от изменяющегося расстояния до пола;
                   если же имеется ввиду 2% от исходного расстояния,
                   то нужно будет ввести новую переменную
                   или присвоить исходное значение z, например х,
                   то есть сразу после z:=sqrt(sqr(x)-sqr(y)); написать x:=z;
                   Формула (оператор) z:=0,98*z;  изменится так:
                   z:=z-x*0,98}
           end;
          writeln('палка упадет через ', t,' мин.');
end.

Відповідь:

#include <iostream>

using namespace std;

int main(){

setlocale(LC_ALL , "Ukrainian");

int from,to;

cout << "Введите диапазон" << endl;

cout << "От: ";

cin >> from;

cout << "До: ";

cin >> to;

if(from > to){

 cout << "Число ОТ не может быть больше за число ДО" << endl;

}

else{

 while(from <= to){

  if(from % 2 != 0){

   cout << from << endl;

  }

  from++;

 }

 cout << "Больше нет нечетных чисел" << endl;

}

return 0;

}

Пояснення: