Помогите решить задачки на составление программки линейной структуры с переменной:1.

Помогите решить задачки на составление программки линейной структуры с переменной:
1. Заработок рабочих на фабрике составил 624750 руб. Его необходимо поделить поровну меж а рабочих и k служащих. Выведите заработок каждого работника.
2. Мальчишка может бежать в 3 раза прытче, чем ходить. Скорость его ходьбы равна y км/ч. Он принял роль в марафонском забеге, но сошел с дистанции, пробежав только x км. Сколько времени он затратил на преодоление этого расстояния.

Задать свой вопрос
1 ответ
// PascalABC.NET 3.3, сборка 1627 от 27.01.2018
// Внимание! Если программка не работает, обновите версию!

1

begin
  var (a,k):=ReadInteger2('Укажите количество рабочих и служащих:');
  Writeln('Заработок труженика равен ',624750/(a+k))
end.

Пример
Укажите количество рабочих и служащих: 15 6
Заработок труженика равен 29750

2

begin
  var y:=ReadReal('Укажите скорость ходьбы, км/ч:');
  var x:=ReadReal('Мальчишка пробежал, км: ');
  Writeln('Затрачено медли на бег, ч: ',x/(3*y):0:2)
end.

Пример
Укажите скорость ходьбы, км/ч: 5.2
Мальчишка пробежал, км:  12
Затрачено времени на бег, ч: 0.77
, оставишь ответ?
Имя:*
E-Mail:


Добро пожаловать!

Для того чтобы стать полноценным пользователем нашего портала, вам необходимо пройти регистрацию.
Зарегистрироваться
Создайте собственную учетную запить!

Пройти регистрацию
Авторизоваться
Уже зарегистрированны? А ну-ка живо авторизуйтесь!

Войти на сайт