olga877
18.03.2020 23:53

Написать код решения в паскале. кощей бессмертный зарыл клад на глубину 1 м. этого ему показалось не достаточно, он отрыл клад, углубил колодец до 2 м и снова зарыл. этого ему опять показалось мало, он отрыл клад, углубил колодец до 3 м и зарыл. затем он проделал тоже, углубив колодец до 4 м, потом до 5 м, 6 м и т.д. известно, что колодец глубиной n метров кощей вырывает за n2 дней. известно также, что на 1001-й день кощей умер от непосильной работы. на какой глубине остался клад? (временем, необходимым для закапывания клада, пренебречь). дана формула: 1^2+2^2+3^2++n^2 < =1001

Нажмите на рекламу ниже и сразу увидите ответ
Популярные вопросы:
Ответ:
anzhelikamilan
25.05.2020 11:35
// 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
0,0(0 оценок)
Ответ:
Audika
25.05.2020 11:35
// 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
0,0(0 оценок)
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota Оформи подписку
logo
Начни делиться знаниями
Вход Регистрация
Что ты хочешь узнать?
Спроси ai-бота