Учеба и наука
Решено
Лифт выдерживает 400 кг. В лифт заходят люди массой от 50 до 70 кг. Сколько людей может зайти в лифт без перегруза(задачи реш. в Delphi) - вопрос №1911944
Вопрос задан анонимно апрель 8, 2016 г.
-
Всего ответов: 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;Лучший ответ по мнению автора