и какая вероятность что пользователь не ошибется?)))
program i_guess_number;
uses crt;
var changes: array [1..2,1..10] of integer;
i,op,n:integer;
s:string;
res:real;
BEGIN
randomize;
writeln("Загадайте число");
n := 0;
repeat
n := n+1;
i := random(10);
op := random(4);
case op of
1: s := "Прибавте ";
2: s := "Отнимите ";
3: s := "Умножте на ";
else s := "Поделите на ";
end;
writeln(s, i);
changes[1,n] := op; {запоминаем действия}
changes[2,n] := i;
until n = 10;
writeln("Что вышло?");
readln(res);
for i := n downto 1 do { производим обратные действия }
begin
case changes[1,i] of
1: res := res - changes[2,i];
2: res := res + changes[2,i];
3: res := res / changes[2,i];
else res := res * changes[2,i];
end;
end;
writeln("Вы загодали ",res);
END.
Program z1;
var a,b,c,p:double;
begin
readln(a);readln(b);
c:=sqrt(a*a+b*b);
p:=a+b+c;
writeln(p);
readln
end.
В 1854 году 1849—1854 гг. Шарлем Бурселем, инженером-механиком и вице-инспектором парижского телеграфа, разработана идея телефонирования. Первый принцип действия телефона Ш. Бурсель изложил в своей диссертации в 1854 году, но до практического осуществления телефонной связи он не дошёл. Ш. Бурсель был также первым, кто употребил слово «телефон» .
В 1860 году в США иммигрант итальянского происхождения Антонио Меуччи продемонстрировал устройство, которое могло передавать звуки по проводам, и названное им Telectrophon. Меуччи подал заявку на патент своего изобретения в 1871 году.
Ответ:
Объяснение:арточки мистера Фокса У мистера Фокса есть карточки, на каждой стороне которых нарисована или машина или какой-то зверь. Карточек, на которых есть животное (хотя бы с одной стороны) — десять, карточек, на которых есть машина (хотя бы с одной стороны) тринадцать, карточек, где на одной стороне машина, а на другой – зверь, 5. Сколько карточек, у которых на обоих сторонах объекты одного
2) положить на стол. 4)начать писать что надо. 5)проверить. 8)решить его в черновике...
