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

Написать алгоритм и составить к нему блок схему . дано: катеты прямоугольного треугольника а=3 см; b=4 см; найти: гипотенузу с

👇
Ответ:
Vladyslav2009
Vladyslav2009
09.04.2021
Квадрат гипотенузы равен сумме квадратов катетов

Написать алгоритм и составить к нему блок схему . дано: катеты прямоугольного треугольника а=3 см; b
4,4(84 оценок)
Ответ:
vvvvNikavvv
vvvvNikavvv
09.04.2021
Блок-схема - в прилагаемом файле.
Программа на паскале:
var a,b,c:real;
begin
a:=3;
b:=4;
c:=sqrt(a*a+b*b);
writeln('c = ',c);
end.

Результат:
c = 5

Написать алгоритм и составить к нему блок схему . дано: катеты прямоугольного треугольника а=3 см; b
4,7(97 оценок)
Открыть все ответы
Ответ:
dasha1957
dasha1957
09.04.2021
1. "Современный вариант"

// PascalABC.NET 3.0, сборка 1076
begin
  var n:=ReadInteger('Введите количество элементов массива: ');
  var a:=ArrRandom(n,1000,10000);
  Write('Исходный массив: ',a,#13#10);
  Write('Множество цифр из разряда сотен: ');
  a.Select(x->(x mod 1000) div 100).Sorted.Distinct.Println(',')
end.

Тестовое решение:
Введите количество элементов массива: 8
Исходный массив: [9374,4420,8856,8274,7555,2461,8302,6325]
Множество цифр из разряда сотен: 2,3,4,5,8

2. "Школьный вариант"

// PascalABC.NET 3.0, сборка 1076
var
  i,n:integer;
  sd:set of 0..9;
  a:array[1..50] of integer;
begin
  Write('Введите количество элементов массива: '); Read(n);
  Randomize;
  Write('Исходный массив: ');
  sd:=[];
  for i:=1 to n do begin
    a[i]:=Random(9001)+1000;
    Write(a[i],' ');
    Include(sd,(a[i] mod 1000) div 100)
    end;
  Writeln;
  Write('Множество цифр из разряда сотен: ');
  for i:=0 to 9 do
    if i in sd then Write(i:2);
  Writeln
end.

Тестовое решение:
Введите количество элементов массива: 8
Исходный массив: 5332 4215 7231 3399 6989 8904 7804 3517
Множество цифр из разряда сотен:  2 3 5 8 9
4,5(98 оценок)
Ответ:
Eldar225566
Eldar225566
09.04.2021

1)Золотые руки, золотое сердце, весеннее настроение

2)Лист – у тетради и у растения
Месяц – в календаре; на небе
Ключ – скрипичный; от двери; горный; гаечный
Горн – кузнечный; духовой инструмент
Конь – животное; шахматная фигура,
Лента – на бескозырке у моряка; бумажная; бант в косе; новостная в газете
Дробь – барабанная; математическая; ружейная
Мушка – насекомое; прицел в винтовке,
Ствол – у дерева; у винтовки,
Конек – морской; украшение на избе; на катке; на сцене
Вал – земляной; девятый; металлическая деталь
Рукав – у реки; у одежды
Тур – баран; в шахматах
Челнок – лодка; в швейной машине
Клетка – птичий домик; строение тела
Баланс – бухгалтерский; в гимнастике
Знак – дорожный; символ
Лук – оружие; растение
Фига – растение; кукиш
Дисциплина – воспитание; школьный предмет
Раздел – снял одежду; глава в книге
Надуть – обмануть; наполнить воздухом
Петрушка – занятная история; растение
Брак – некачественная работа; свадьба
Бродить – закисать (о жидкости); ходить без цели
Глава – самый главный; голова; раздел в книге
Ласка – доброта и нежность; животное
Норка – жилье животного; животное
Образование – усвоение знаний; организация чего-то нового
Охота – когда очень хочется; на животных

3) Дебет, кредит, авизо, проводка, эмбарго

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