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

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

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

4 года назад

9

Решите прошу=(Очень сложно=((

Решите прошу=(Очень сложно=((

Информатика

1 ответ:

Анна Валерова [7]4 года назад

0 0

K 5 21 18
m 7 23 20
n 12 44 38
k 22 86 76
m 33 65 56

С:\\Рефераты\Физика\Оптические Явления.dosx
C:\\Рефераты\Информатика\Компьютерные вирусы.dosx

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

Помогите решить задачу в Паскале У гусей и кроликов вместе 64 лапы. сколько может быть кроликов и гусей (указать все сочетания к

Илья1972

Var a,b:integer;
begin
while a*4<65 do
begin
writeln('кролик: ',a,' гусь: ',(64-a*4) div 2);
a:=a+1;
end;
end.

0 0

4 года назад

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

Нарисовать снеговика(радиус головы 40,туловища-70,низа-100;пуговицы и рот лежат на одной прямой руки на одном уровне,касаются с

Дмитрий Эдуардович [2]

Ну я даже не знаю... Берешь циркуль и рисуешь круг диаметром 40, еще круг диаметром 140, и еще круг 200 диаметром ну и руки с ртом на одной линии!

0 0

4 года назад

7 класс. Turbo PascaleЗадание №1:int(-5,89) int(0,53) round(-5,8) round(5,2) frac(-17,4) frac(0,32) trunc(-17,4) trunc(15,2) 45

Рибоксин

Задание №1:
int(-5,89)= -5
int(0,53)=0
round(-5,8)=-6
round(5,2)=5
frac(-17,4)=0,4
frac(0,32)=0,32
trunc(-17,4)=-17
trunc(15,2)=15
45 div 4=11
15 mod 8=7
(489 div 10) mod 10=8

Задача №2:

а=1, в=2;    a=2

а=3, в=3;   a=0

а=4, в=2;   a=2

а=-3, в=5   a=-15

Задача №3:

var m,s:integer;
begin
readln(m);
readln(s);
if s>m then writeln('Саша старше Маши')
        else if m>s then writeln('Маша старше Саши ')
              else writeln('Саша и Маша ровесники');
end.

Задача №4:

var a:real;
begin
write('Введите число: ');
readln(a);
if a>0 then a:=a/7
        else a:=a*a;
writeln(a);
end.

Задача №5:

var a,b:real;
begin
write('Введите первое число: ');
readln(a);
write('Введите второе число: ');
readln(b);
if a>b then writeln('Наибольшее число: ',a)
        else writeln('Наибольшее число: ',b);
end.

Задача №6:

var a,b,c,p:real;
begin
write('Введите первое число: ');
readln(a);
write('Введите второе число: ');
readln(b);
write('Введите третье число: ');
readln(c);
if a>b then if a>c then p:=a
                    else p:=c
       else if b>c then p:=b
                    else p:=c;
writeln('Наибольшее число: ',p);
end.

Задача №7:

var a,b,c,d,p:real;
begin
write('Введите первое число: ');
readln(a);
write('Введите второе число: ');
readln(b);
write('Введите третье число: ');
readln(c);
write('Введите четвертое число: ');
readln(d);
if a>b then if a>c then p:=a
                    else p:=c
       else if b>c then p:=b
                    else p:=c;
if p<d then p:=d;
writeln('Наибольшее число: ',p);
end.

Задача №8:

var a:real;
begin
a:=0;
while a<7.9 do
begin
write('Введите скорость ракеты: ');
readln(a);
if (a>=7.9) and (a<11.2) then writeln('Ракета станет спутником Земли')
    else if (a>=11.2) and (a<16.6) then writeln('Ракета станет спутником Cолнца')
          else if a>=16.6 then writeln('Ракета покинет Cолнечную систему')
                          else writeln('Требуется повторный ввод скорости');
end;
end.

0 0

4 года назад

Помогите дз по ивт даю 20баллов

vigori

F= ¬A*B+¬(A*B)
F=¬A*B+¬A+¬B
F=¬A(B+1) +¬B
F=¬A+¬B

A B ¬A ¬B   F
0 0 1 1 1
0 1 1 0 1
1 0 0 1 1
1 1   0 0 0
----------------------------------------------------------------------
F=¬( (A+¬C)*¬C)
F=¬(A+¬C) +C
F=¬A*C+C
F=C(¬A+1)
F =C    (F не зависит от A)

A C F
0 0 0
0 1 1
1 0 0
1 1 1
------------------------------------------------
F=¬(B*¬(¬C+¬D))
F=¬(B*C*D)

B C D    B*C*D   F
0 0 0 0 1
0 0 1 0 1
0 1 0   0 1
0 1 1   0 1
1 0 0 0 1
1 0 1 0 1
1 1 0 0 1
1 1 1 1    0

0 0

4 года назад

Помогите пожалуйста К реке одновременно подошли три купца и три разбойника.Всем необходимо было переправиться на противоположный

loladasda

р1, р2, р3, к1,к2,к3 - 0

1) р1+к1 > ( р2, р3,к2,к3 - р1,к1)

2) к1 < (р2, р3,к2,к3,к1 - р1)

3) р2, р3 > (к2,к3,к1 - р1,р2, р3)

4) р1 < (к2,к3,к1,р1 - р2, р3)

5) к2,к3> (к1,р1 - р2, р3,к2,к3)

6) р2< (к1,р1,р2 - р3,к2,к3)

7) к1,р1> (р2 - р3,к2,к3,к1,р1)

8) р3< (р2,р3 - к2,к3,к1,р1)

9) р2,р3 > (р1, р2, р3, к1,к2,к3 )

0 0

4 года назад