tutotveti.ru
Предметы
Биология
Українська мова
Музыка
Французский язык
Физика
МХК
Обществознание
Психология
ОБЖ
Право
Беларуская мова
Литература
Химия
Українська література
Экономика
Немецкий язык
География
Информатика
Қазақ тiлi
Геометрия
Английский язык
Русский язык
Окружающий мир
Алгебра
История
Другие предметы
Видео-ответы
ПОИСК
Войти
Регистрация
Информатика
Составьте блок-схему
Составьте блок-схему и напишите программу вычисления площади и гипотенузы прямоугольного треугольника, если известны его катеты.
Onik2002
2 22.06.2019 23:50
6
Ответы
skata9196
02.10.2020 08:56
Var
a,b,c,z,p,r:real;
begin
writeln ('Введите катет А ');
readln (a);
writeln ('Введите катет B ');
readln (b);
z:=sqr(a)+sqr(b);
c:=sqrt(z);
writeln ('Гипотенуза равна ',c);
p:=(a+b+c)/2; {по формуле Герона нахожу полупериметр}
r:=sqrt(p*(p-a)*(p-b)*(p-c));
writeln ('Площадь треугольника равна --> ',r);
end.
надеюсь блок схема понятна
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика
Алинаfox11
08.12.2021 17:44
Даны N штук целых чисел. Найти произведение чётных положительных чисел !! Решить надо на с++...
Polino4444444ka
29.09.2019 00:30
Придумайте и изобразите своё диалоговое окно, подобное изображённому в учебнике окно мой новый компьютер...
alesa6002
29.09.2019 00:30
Если в какой-то системе счисления 4x4=20, то чему равно произведение 5x5 в той же системе счисления? можно просто ответ но лучше с пояснением...
MADHOP2016
28.09.2019 00:20
б подання повідомлення. термометр, годинник к якому родання повідомлення відноситься?...
Нюра959
28.09.2019 00:20
Напишите программу, которая позволяет ввести три вещественных числа и выводит на экран: натуральный логарифм квадрата суммы первого и третьего чисел. все вещественные числа должны...
ШАТАНТРУБА
14.05.2020 14:56
Блок-схеме соответствует программа :...
минкп
26.09.2019 21:40
Трое студентов, пятикурсник, третьекурсник и первокурсник, живут в одной комнате общежития и любят участвовать в соревнованиях по программированию по правилам acm. у каждого из них...
Клевая401
04.04.2020 21:12
5. Вода нагрівається електрокип ятильником у посудині ємкістю 2,2 л за 32 хв. Визначити силу струму , що протікає через спіраль кип’ятильника, якщо він ввімкнений у мережу з напругою...
конфетка03031
04.04.2020 21:11
У капілярній трубці радіусом 0,5 мм рідина піднялася на висоту 10 мм . Коефіцієнт поверхневого натягу рідини 0.034 H/м. визначити густину рідини .До ть будь ласка...
STALKER147
04.04.2020 21:11
Выделите цветом правильные варианты ответов. Негативными последствиями создания Каракумского канала являются: изменение расхода воды в реке Амударья, увеличение объема воды в реке...
Популярные вопросы
1. Які правила поведінки у випадку захоплення в заручники? 2. Які причини безпритульності?...
2
Твір роздум як врятувати світ? Обсяг 2 сторінки ( можна менше)...
1
Schreibt die Sätze richtig. (liegtIm Berlins Museumsinsel Zentrum die) (es Museum...
3
Индивид это - а) биологическая особь; б) биологическая индивидуальность; в) представитель...
1
Дайте розгорнуту відповідь на питання. Хто, на вашу думку, із тваринного світу...
2
Кірковий центр зорового аналізатора розташований а) у скроневій частці кори.в)...
1
Знайдіть область визначення функції y=√4-x²...
3
Яким можна подати команду для виконавця.....
1
Знайти зміну імпульсу тіла за 1хв, якщо рівнолійна всіх сил 1500Н...
1
Можно с решением по примеру в 3 картинке...
3
a,b,c,z,p,r:real;
begin
writeln ('Введите катет А ');
readln (a);
writeln ('Введите катет B ');
readln (b);
z:=sqr(a)+sqr(b);
c:=sqrt(z);
writeln ('Гипотенуза равна ',c);
p:=(a+b+c)/2; {по формуле Герона нахожу полупериметр}
r:=sqrt(p*(p-a)*(p-b)*(p-c));
writeln ('Площадь треугольника равна --> ',r);
end.
надеюсь блок схема понятна