В овощехранилище привезли яблоки в ящиках и контейнерах. В одном ящике 6 кг яблок, что в 7 раз меньше, чем в одном контейнере. Сколько килограммов яблок привезли в 120 ящиках и 80 контейнерах?
Международный женский день празднуется 8 марта.Это прекрасный и весенний праздник,который наполняется улыбками мам,бабушек,девочек.В этот день мужчины,дедушки и мальчики,покупая цветы и даря подарки,радуют противоположный пол. Мой папа всегда поздравляет мою маму,подруг,бабушек и меня,покупая разные конфеты и пирожные,а я,делая своими руками,дарю маме и бабушке открытку. Мои одноклассники всегда поздравляют,обнимая,девчонок с Международным Женским Днём и устраивают шумную и весёлую дискотеку. Мы очень любим наших мальчиков! В этот радостный день я желаю всем отличного настроения,прекрасных друзей и улыбаться всегда! Может и коротенькое,но постаралась.
Var a,b,c,d,x,y:real; begin Write('Введите размеры сторон сундука -> '); Readln(a,b,c); Write('Введите диаметр иллюминатора -> '); Readln(d); if a<b then begin x:=a; if b<c then y:=b else y:=c end else begin x:=b; if a<c then y:=a else y:=c end; if (sqr(x)+sqr(y)<sqr(d)) then Writeln('Сундук можно вытащить') else Writeln('Сундук нельзя вытащить') end.
Тестовое решение: Введите размеры сторон сундука -> 3 5 3.99 Введите диаметр иллюминатора -> 5 Сундук можно вытащить
********************** Условие попадания точки A(x,y) внутрь треугольника описывается как
var x,y:real; begin Write('Введите координаты x и y точки -> '); Readln(x,y); if (x>=0) and (y>=0) and (y<=5-x) then Writeln('Да') else Writeln('Нет') end.
Тестовое решение: Введите координаты x и y точки -> 3 2.5 Нет
2) 6 120 = 720 (кг) — во всех ящиках;
3) 42 • 80 = 3360 (кг) — во всех контейнерах;
4) 720 + 3360 = 4080 (кг) — всего яблок.
Ответ: 4080 кг.