Задать вопрос!

Задать вопрос!

Все категории

4 года назад

7

В корзине 4 яблока и 3 апельсина.

какое наименьшее число фруктов нужно вынуть из корзины не глядя чтобы среди них было 2апельсина?

Информатика

1 ответ:

Роман Полешцев4 года назад

0 0

2 фрукта нужна вынуть

Читайте также

Составьте программу которая определяет сколько слагаемых должно быть в сумме 1+2+3+4+..., чтобы сумма оказалась: больше заданног

enot140

Var
n,i : Integer;
Begin
Readln(n);
i:=1;
While (i+1)*i div 2<=n do Inc(i);
Writeln(i);
end.

0 0

4 года назад

Даны два двоичных числа определить их сумму разность произведение и частное от деления: 0,01001 и 0,00101

Заратустра [39]

Uses crt;
<span>var a,b,rez:real; </span>
<span>begin </span>
<span>clrscr; </span>
<span>readln(a,b); </span>
<span>Writeln('Summa - ',a*a+b*b:0:2); </span>
<span>writeln('Raznost - ',a*a-b*b:0:2); </span>
<span>writeln('Proizv - ',a*a*b*b:0:2); </span>
<span>writeln('Chastnoe - ',a*a/(b*b):0:2); </span>
<span>readkey; </span>
<span>end.</span>

0 0

4 года назад

Дополни схему : управляющий объект-алладин , объект управления???? Название литературного произведения и его автор????

perolec [7]

Управляющий объект алладин,объект управления лампа или ковер может быть;"крепкий мужик" автор шукшин.

0 0

4 года назад

Ввести одномерный массив A из 15 элементов. Определить в нём среднее геометрическое элементов, стоящих на нечётных позициях. Pa

skol00

<u>PascalABC.NET 3.4.0, сборка 1671 от 31.05.2018</u>
<u>Внимание! Если программа не работает, обновите версию!</u>

begin
var a:=ReadArrInteger(15);
var s:=Range(0,a.Length-1,2).Select(i->a[i]);
Writeln('Среднее геометрическое элементов на нечетных позициях ',
(s.Aggregate(1.0,(p,q)->(p*q)))**(1/s.Count))
end.

0 0

4 года назад

напишите программу вычисления по формуле Y=(3x^3+7)^2 , где х- целое число.

юрий - вятка [55]

program zadacha_1;

0 0

4 года назад