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

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

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

3 года назад

9

Дан ящик сахарного песка, чашечные весы и гирька в 1 г. Как возможно быстрее отвесить покупателю 1 кг? (Укажите схему уравновеши

<span>ваний.)</span>

Информатика

1 ответ:

Елена369 [4.1K]3 года назад

0 0

<span><span><span> 1
</span><span> 1 2
</span><span> 2 4
</span><span> 3 8
</span><span> 4 16
</span><span> 5 32
</span><span> 6 64
</span><span> 7 128
</span><span> 8 256
</span><span> 9 512
</span><span> 10 1024

</span></span></span>

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

Написать программу на turbo pascal.1.Вычислить значение факториала n! (P=1*2*...*n*N)..N=122.Найти сумму элементов заданного мас

ЯТ [7]

1)
const
n=12;
var
i,p:integer;
begin
p:=1;
for i:=1 to n do
  p:=p*i;
writeln(P);
<span>end.
2)
const
n=7;
varc:array[1..7]of integer;
i,s:integer;
begin
for i:=1 to n do
  begin
readln(c[i]);
s:=s+c[i];
  end;
writeln(s)
<span>end.
</span>3)
const
a=20.3;
var
x,y:real;
begin
readln(x);
  if x>1 then y:=ln(x+1)
else y:=sqr(cos(sqrt(abs(a*x))));
writeln(y);
<span>end.</span></span>

0 0

4 года назад

Прочитать ещё 2 ответа

. Вася и Петя играли в шпионов и кодировали сообщение собственным шифром. Фрагмент кодовой таблицы приведён ниже: Н М Л И Т О ~

testing-pro

<span>1. *@
2. @~*
3.*~
4.*
5.~
Ответ: 5 различных букв</span>

0 0

4 года назад

Пожалуйста, помогите решить информатику 3 класс. Надо дорисовать фигуры и вписать слова в пустые клетки таблиц. Таблицы во вложе

Русский Коловрат

Мак,марк,маска,молоко.

дом,дуга,доска,дорога

сок,соль,сойка,собака.

шут,шуба,шутка,шарада

леопард,крот,тигр,слон,

клён,тополь,Берёза,липа

0 0

4 года назад

Прочитать ещё 2 ответа

Помогите написать программу по информатике в Pascal ABC! Вот задача: в каждом углу комнаты сидело по кошке. У каждой кошки x кот

Lenaa250

Program zadacha;
var a,x:integer;
begin
read(x);
a:=4*4*x;
write(a);
end.

0 0

4 года назад

Дано уравнение ax+b=0. Найти решение этого уравнения или сообщить,что решения не существует.

Margo-margo

VAR a,b:integer;
x:real;
begin
writeln(' a=');
readln(a);
writeln ('b=');
readln (b);
x:=-b/a;
if a =0 then writeln('uravnenie korney ne imeet')
else
writeln('korni uravneniya=',x);
readln;
<span>end.</span>

0 0

4 года назад