Лифт выдерживает 400 кг. В лифт заходят люди массой от 50 до 70 кг. Сколько людей может зайти в лифт без перегруза(задачи реш. в Delphi)

Вопрос задан анонимно
08.04.16
1 ответ

Лучший ответ по мнению автора

На нажатие кнопки ставите код
var m,k,s:integer;
begin
  m := 400;
  k := m div 70;
  s := m — k*70;
  if (s >=50) then k := k+1;
  ShowMessage('Может уместиться ' + IntTostr(k) + ' человек');
end;
10.04.16
Лучший ответ по мнению автора

Елена Васильевна

Читать ответы

Виктор Щебетун

Читать ответы

Альфия

Читать ответы
Посмотреть всех экспертов из раздела Учеба и наука > Информатика