Паскаль нужно было написать такую программу: 1) площадь треугольника корень кв. из p(p-a)(p-b)(p-c), где p=a+b+c/2 написал программу следующим образом: program abd; var a,b,c; integer; p: real; writeln ('a,b,c'); readln (bcd); p: =(a+b+c); writeln ('p=',p); readln; end. почему не читает? и еще a=b+c,если a> 2, то d=4, иначе d=5. (условный оператор if) programm abc; var b,c; integer;
238
368
Ответы на вопрос:
Program abd; var a,b,c: integer; p,s: real; begin writeln ('a,b,c'); readln (a,b,c); p: =(a+b+c)/2; s: = sqrt(p*(p-a)*(p-b)*(p-c)); writeln ('s=',s: 2: 1); end.это программа к первой
следующий костюм - меняет костюм на следующий
сменить костюм на костюм - меняет костюм на указанный
сменить фон на фон - меняет фон на указанный
Популярно: Информатика
-
dary09007.09.2021 18:30
-
SemenBio07.07.2020 00:51
-
123KETCHUP12307.04.2022 19:36
-
Артем22221127.01.2020 14:35
-
788SOS11123.04.2020 04:09
-
ivanova32909.05.2021 04:53
-
kino201130.04.2023 12:35
-
Antik300616.11.2020 07:37
-
raistarasenko05.01.2023 19:32
-
0663738115.01.2022 02:24