Ответы на вопрос:
var
x,y,p:real;
begin
write('Enter X:=');readln(x);
write('Enter P:=');readln(p);
y:=(p-2*x)/4;
write('S:=',y*(y+x));
end.
паскаль
Объяснение:
Популярно: Информатика
-
leryn199901.12.2021 00:43
-
kondratenkoari111.02.2023 14:14
-
Sashafhvh10.05.2020 15:41
-
viktorrudnik5316.10.2022 22:48
-
0Neder025.07.2021 11:44
-
Halula05.10.2021 20:51
-
Evangelins13.11.2021 14:48
-
pankovakseniya08.04.2023 09:30
-
vika24rus2514.09.2022 02:04
-
kazmerovichvika07.04.2020 21:13