М
Молодежь
К
Компьютеры-и-электроника
Д
Дом-и-сад
С
Стиль-и-уход-за-собой
П
Праздники-и-традиции
Т
Транспорт
П
Путешествия
С
Семейная-жизнь
Ф
Философия-и-религия
Б
Без категории
М
Мир-работы
Х
Хобби-и-рукоделие
И
Искусство-и-развлечения
В
Взаимоотношения
З
Здоровье
К
Кулинария-и-гостеприимство
Ф
Финансы-и-бизнес
П
Питомцы-и-животные
О
Образование
О
Образование-и-коммуникации
мTTTTTTся
мTTTTTTся
12.09.2022 22:50 •  Информатика

Составьте программу нахождения гипотенузы прямоугольного треугольника если известны его катеты

👇
Ответ:
elf35
elf35
12.09.2022
Var
a,b,c,z:real;
begin
writeln ('Введите катет А ');
readln (a);
writeln ('Введите катет B ');
readln (b);
z:=sqr(a)+sqr(b);
c:=sqrt(z);
writeln ('Гипотенуза равна ',c);
end.
4,5(83 оценок)
Открыть все ответы
Ответ:
Const
n=10;m=7;
var
a:array[1..n,1..m]of integer;
flag,i,j,b:integer;
begin
     for i:=1 to n do
         begin
             writeln;
                 for j:=1 to m do
                      begin
                        a[i,j]:=random(312)-111;
                        write(a[i,j]:4);
                      end;
            end;
writeln;
Writeln('B ?');
readln(b);
for i:=1 to n do
  for j:=1 to m do
      if a[i,j]=b then
          flag:=1;
if flag=1 then
   writeln('Yes')
else
   writeln('N');
end.

вариант 2
const
n=10;m=7;
var
a:array[1..n,1..m]of integer;
k,i,j,b:integer;
begin
     for i:=1 to n do
         begin
             writeln;
                 for j:=1 to m do
                      begin
                        a[i,j]:=random(312)-111;
                        write(a[i,j]:4);
                      end;
            end;
writeln;
Writeln('B ?');
readln(b);
for i:=1 to n do
  for j:=1 to m do
      if a[i,j]=b then
          k:=k+1;
if k<>0 then
   writeln('Yes')
else
   writeln('N');
end.
4,6(98 оценок)
Ответ:
znatokchok
znatokchok
12.09.2022

1110001100(в двоичной системе)

Объяснение:

256+652=908

908:2=454(ост.0)

454:2=227(ост.0)

227:2=113(ост.1)

113:2=56(ост.1)

56:2=28(ост.0)

28:2=14(ост.0)

14:2=7(ост.0)

7:2=3(ост.1)

3:2=1(ост.1)

1110001100(в двоичной системе) =908(в десятичной)

Чтобы из десятичной системы число перевести в двоичную систему, то нам нужно будет делить число на 2,и так каждый раз, до тех пор, пока в ответе не будет 1

Далее собираем вот этот вот последний ответ 1,и все остатки(кстати, собираем мы это все снизу вверх), и получаем наше двоичное число

Удачи!

4,8(34 оценок)
Это интересно:
Новые ответы от MOGZ: Информатика
logo
Вход Регистрация
Что ты хочешь узнать?
Спроси Mozg
Открыть лучший ответ